/ APDL Eductation Resources / APDL Eductation Resources.iso / programs / games / puzzle / x_word / !Do_Word / !RUNIMAGEB

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 44 10 9f e5 3c 20 9f e5 | 34 30 9f e5 04 00 12 e4 |D...< ..|40......|
|00000010| 04 00 03 e4 04 10 51 e2 | fb ff ff 5a 00 00 8f e2 |......Q.|...Z....|
|00000020| 05 00 00 ef 42 41 53 49 | 43 20 2d 51 75 69 74 20 |....BASI|C -Quit |
|00000030| 40 30 30 30 30 39 30 30 | 30 2c 30 30 30 31 34 36 |@0000900|0,000146|
|00000040| 37 34 00 01 74 46 01 00 | c4 36 01 00 74 b6 00 00 |74..tF..|.6..t...|
|00000050| 0d 00 0a 1d 20 f4 20 3e | 24 2e 21 44 6f 5f 57 6f |.... . >|$.!Do_Wo|
|00000060| 72 64 2e 21 52 55 4e 49 | 4d 41 47 45 42 0d 00 19 |rd.!RUNI|MAGEB...|
|00000070| 30 20 c8 99 22 48 6f 75 | 72 67 6c 61 73 73 5f 4f |0 .."Hou|rglass_O|
|00000080| 6e 22 3a f4 20 54 52 41 | 43 45 20 54 4f 20 22 73 |n":. TRA|CE TO "s|
|00000090| 63 73 69 3a 3a 34 2e 44 | 45 42 55 47 22 0d 00 28 |csi::4.D|EBUG"..(|
|000000a0| 25 20 f2 73 65 74 75 70 | 3a f2 73 65 74 75 70 32 |% .setup|:.setup2|
|000000b0| 3a f2 73 65 74 75 70 33 | 3a f2 72 65 61 64 5f 76 |:.setup3|:.read_v|
|000000c0| 65 72 0d 00 2d 47 20 e7 | 20 72 69 73 63 24 3e 3d |er..-G .| risc$>=|
|000000d0| 22 33 22 20 ff 28 22 52 | 4d 45 4e 53 55 52 45 20 |"3" .("R|MENSURE |
|000000e0| 44 72 61 77 46 69 6c 65 | 20 30 2e 30 20 52 4d 4c |DrawFile| 0.0 RML|
|000000f0| 4f 41 44 20 3c 4f 62 65 | 79 24 44 69 72 3e 2e 44 |OAD <Obe|y$Dir>.D|
|00000100| 72 61 77 46 69 6c 65 22 | 29 0d 00 37 24 20 ee 20 |rawFile"|)..7$ . |
|00000110| 85 20 e7 20 a4 77 69 6d | 70 65 72 72 6f 72 20 c8 |. . .wim|perror .|
|00000120| 98 20 8b 20 f2 65 72 72 | 6f 72 3a c8 98 0d 00 46 |. . .err|or:....F|
|00000130| 2b 20 f2 72 6d 28 22 4d | 55 41 35 22 29 3a 72 65 |+ .rm("M|UA5"):re|
|00000140| 67 24 3d 22 2e 22 2b 74 | 65 78 74 24 3a f2 73 65 |g$="."+t|ext$:.se|
|00000150| 74 75 70 5f 68 65 6c 70 | 0d 00 55 16 20 f2 6d 61 |tup_help|..U. .ma|
|00000160| 69 6e 6d 65 6e 75 28 6d | 6d 65 6e 75 25 29 0d 00 |inmenu(m|menu%)..|
|00000170| 64 31 20 c8 99 22 48 6f | 75 72 67 6c 61 73 73 5f |d1 .."Ho|urglass_|
|00000180| 53 6d 61 73 68 22 3a f2 | 73 74 61 72 74 75 70 5f |Smash":.|startup_|
|00000190| 6d 65 6d 3a f2 67 72 61 | 62 5f 73 65 74 75 70 0d |mem:.gra|b_setup.|
|000001a0| 00 82 38 20 e7 20 63 6f | 6d 64 24 3c 3e 22 22 20 |..8 . co|md$<>"" |
|000001b0| f2 6c 6f 61 64 28 63 6f | 6d 64 24 29 3a 24 6e 61 |.load(co|md$):$na|
|000001c0| 6d 65 25 3d 63 6f 6d 64 | 24 3a f2 75 70 64 61 74 |me%=comd|$:.updat|
|000001d0| 65 5f 74 69 74 6c 65 0d | 00 91 26 20 e7 20 63 6f |e_title.|..& . co|
|000001e0| 6d 64 24 3c 3e 22 22 20 | 63 6c 6f 73 65 64 25 3d |md$<>"" |closed%=|
|000001f0| a3 20 8b 20 63 6c 6f 73 | 65 64 25 3d b9 0d 00 a0 |. . clos|ed%=....|
|00000200| 1e 20 ee 20 85 20 e7 20 | a4 77 69 6d 70 65 72 72 |. . . . |.wimperr|
|00000210| 6f 72 20 8b 20 f2 65 72 | 72 6f 72 0d 00 af 06 20 |or . .er|ror.... |
|00000220| f5 0d 00 be 31 20 e7 20 | 63 6c 6f 73 65 64 25 20 |....1 . |closed% |
|00000230| f2 69 63 6f 6e 62 61 72 | 77 61 69 74 3a e7 20 71 |.iconbar|wait:. q|
|00000240| 75 69 74 25 3d b9 20 f2 | 63 6c 6f 73 65 5f 64 6f |uit%=. .|close_do|
|00000250| 77 6e 0d 00 cd 0c 20 f2 | 72 65 67 62 6f 78 0d 00 |wn.... .|regbox..|
|00000260| dc 33 20 f2 6f 70 65 6e | 77 69 6e 64 6f 77 28 77 |.3 .open|window(w|
|00000270| 68 61 6e 64 6c 65 31 25 | 29 3a e7 20 66 69 6c 65 |handle1%|):. file|
|00000280| 5f 6c 6f 61 64 65 64 3d | b9 20 f2 61 63 5f 77 69 |_loaded=|. .ac_wi|
|00000290| 6e 0d 00 eb 2b 20 c8 99 | 22 57 69 6d 70 5f 53 65 |n...+ ..|"Wimp_Se|
|000002a0| 74 43 61 72 65 74 50 6f | 73 69 74 69 6f 6e 22 2c |tCaretPo|sition",|
|000002b0| 77 68 61 6e 64 6c 65 31 | 25 2c 2d 31 0d 00 fa 1d |whandle1|%,-1....|
|000002c0| 20 71 75 69 74 25 3d a3 | 3a 63 6c 6f 73 65 64 25 | quit%=.|:closed%|
|000002d0| 3d a3 3a 65 6e 64 25 3d | a3 0d 01 09 06 20 f5 0d |=.:end%=|..... ..|
|000002e0| 01 18 0b 20 20 f2 70 6f | 6c 6c 0d 01 36 1d 20 fd |...  .po|ll..6. .|
|000002f0| 20 71 75 69 74 25 20 84 | 20 63 6c 6f 73 65 64 25 | quit% .| closed%|
|00000300| 20 84 20 65 6e 64 25 0d | 01 45 04 0d 01 54 18 20 | . end%.|.E...T. |
|00000310| e7 20 71 75 69 74 25 20 | f2 63 6c 6f 73 65 5f 64 |. quit% |.close_d|
|00000320| 6f 77 6e 0d 01 72 18 20 | 63 6c 6f 73 65 64 25 3d |own..r. |closed%=|
|00000330| b9 3a f2 63 6c 6f 73 65 | 61 6c 6c 0d 01 81 1c 20 |.:.close|all.... |
|00000340| c8 99 22 57 69 6d 70 5f | 43 72 65 61 74 65 4d 65 |.."Wimp_|CreateMe|
|00000350| 6e 75 22 2c 2c 2d 31 0d | 01 90 0e 20 fd 20 71 75 |nu",,-1.|... . qu|
|00000360| 69 74 25 3d b9 0d 01 9f | 10 20 f4 2d 2d 2d 2d 2d |it%=....|. .-----|
|00000370| 2d 2d 2d 2d 2d 0d 01 ae | 11 20 dd f2 63 6c 6f 73 |-----...|. ..clos|
|00000380| 65 5f 64 6f 77 6e 0d 01 | bd 36 20 f2 63 6c 6f 73 |e_down..|.6 .clos|
|00000390| 65 61 6c 6c 32 3a c8 99 | 22 4d 65 73 73 61 67 65 |eall2:..|"Message|
|000003a0| 54 72 61 6e 73 5f 43 6c | 6f 73 65 46 69 6c 65 22 |Trans_Cl|oseFile"|
|000003b0| 2c 6d 65 73 73 61 67 65 | 5f 70 74 72 0d 01 cc 23 |,message|_ptr...#|
|000003c0| 20 c8 99 22 58 4f 53 5f | 4d 6f 64 75 6c 65 22 2c | .."XOS_|Module",|
|000003d0| 37 2c 2c 6d 65 73 73 61 | 67 65 5f 61 72 65 61 0d |7,,messa|ge_area.|
|000003e0| 01 db 37 20 24 62 6c 6f | 63 6b 25 3d 22 54 41 53 |..7 $blo|ck%="TAS|
|000003f0| 4b 22 3a c8 99 22 57 69 | 6d 70 5f 43 6c 6f 73 65 |K":.."Wi|mp_Close|
|00000400| 44 6f 77 6e 22 2c 74 61 | 73 6b 25 2c 21 62 6c 6f |Down",ta|sk%,!blo|
|00000410| 63 6b 25 3a c8 98 0d 01 | ea 06 20 e1 0d 01 f9 10 |ck%:....|.. .....|
|00000420| 20 f4 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 02 08 12 | .------|----....|
|00000430| 20 dd f2 69 63 6f 6e 62 | 61 72 77 61 69 74 0d 02 | ..iconb|arwait..|
|00000440| 17 1d 20 65 6e 64 25 3d | a3 3a 63 6c 6f 73 65 64 |.. end%=|.:closed|
|00000450| 25 3d a3 3a 71 75 69 74 | 25 3d a3 0d 02 26 06 20 |%=.:quit|%=...&. |
|00000460| f5 0d 02 35 24 20 c8 99 | 22 57 69 6d 70 5f 50 6f |...5$ ..|"Wimp_Po|
|00000470| 6c 6c 22 2c 2c 62 6c 6f | 63 6b 25 20 b8 20 72 65 |ll",,blo|ck% . re|
|00000480| 61 73 6f 6e 25 0d 02 44 | 11 20 c8 8e 20 72 65 61 |ason%..D|. .. rea|
|00000490| 73 6f 6e 25 20 ca 0d 02 | 53 0f 20 c9 20 36 3a f2 |son% ...|S. . 6:.|
|000004a0| 6d 6f 75 73 65 0d 02 62 | 26 20 c9 20 38 3a c8 99 |mouse..b|& . 8:..|
|000004b0| 22 57 69 6d 70 5f 50 72 | 6f 63 65 73 73 4b 65 79 |"Wimp_Pr|ocessKey|
|000004c0| 22 2c 62 6c 6f 63 6b 25 | 21 32 34 0d 02 71 18 20 |",block%|!24..q. |
|000004d0| c9 20 39 3a f2 69 63 6f | 6e 62 61 72 6f 70 74 69 |. 9:.ico|nbaropti|
|000004e0| 6f 6e 73 0d 02 80 19 20 | c9 20 31 37 2c 31 38 3a |ons.... |. 17,18:|
|000004f0| f2 69 63 6f 6e 72 65 63 | 65 69 76 65 0d 02 8f 06 |.iconrec|eive....|
|00000500| 20 cb 0d 02 9e 13 20 fd | 20 65 6e 64 25 20 84 20 | ..... .| end% . |
|00000510| 71 75 69 74 25 0d 02 ad | 06 20 e1 0d 02 bc 11 20 |quit%...|. ..... |
|00000520| f4 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 02 cb 15 |.-------|----....|
|00000530| 20 dd f2 69 63 6f 6e 62 | 61 72 6f 70 74 69 6f 6e | ..iconb|aroption|
|00000540| 73 0d 02 da 14 20 63 68 | 6f 69 63 65 25 3d 21 62 |s.... ch|oice%=!b|
|00000550| 6c 6f 63 6b 25 0d 02 e9 | 36 20 e7 20 63 68 6f 69 |lock%...|6 . choi|
|00000560| 63 65 25 3d 31 20 f2 76 | 65 72 69 66 79 73 68 75 |ce%=1 .v|erifyshu|
|00000570| 74 64 6f 77 6e 3a e7 20 | 73 61 76 65 5f 63 6c 6f |tdown:. |save_clo|
|00000580| 73 65 3d b9 20 65 6e 64 | 25 3d b9 0d 02 f8 06 20 |se=. end|%=..... |
|00000590| e1 0d 03 07 10 20 f4 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..... .-|--------|
|000005a0| 2d 0d 03 16 12 20 dd f2 | 69 63 6f 6e 72 65 63 65 |-.... ..|iconrece|
|000005b0| 69 76 65 0d 03 25 13 20 | c8 8e 20 62 6c 6f 63 6b |ive..%. |.. block|
|000005c0| 25 21 31 36 20 ca 0d 03 | 34 13 20 20 c9 20 30 3a |%!16 ...|4.  . 0:|
|000005d0| 71 75 69 74 25 3d b9 3a | e1 0d 03 43 2d 20 20 c9 |quit%=.:|...C-  .|
|000005e0| 20 33 3a f2 64 72 61 67 | 3a 65 6e 64 25 3d b9 3a | 3:.drag|:end%=.:|
|000005f0| f2 6f 70 65 6e 77 69 6e | 64 6f 77 28 77 68 61 6e |.openwin|dow(whan|
|00000600| 64 6c 65 31 25 29 0d 03 | 52 31 20 20 f4 20 57 48 |dle1%)..|R1  . WH|
|00000610| 45 4e 20 35 3a 50 52 4f | 43 64 6f 75 62 6c 65 63 |EN 5:PRO|Cdoublec|
|00000620| 6c 69 63 6b 3a 49 46 20 | 52 30 3c 3e 30 20 65 6e |lick:IF |R0<>0 en|
|00000630| 64 25 3d 54 52 55 45 0d | 03 61 1d 20 20 c9 20 26 |d%=TRUE.|.a.  . &|
|00000640| 34 30 30 43 31 3a f2 6d | 6f 64 65 5f 63 68 61 6e |400C1:.m|ode_chan|
|00000650| 67 65 64 32 0d 03 70 06 | 20 cb 0d 03 7f 06 20 e1 |ged2..p.| ..... .|
|00000660| 0d 03 8e 10 20 f4 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.... .--|--------|
|00000670| 0d 03 9d 0f 20 dd f2 63 | 6c 6f 73 65 61 6c 6c 0d |.... ..c|loseall.|
|00000680| 03 ac 3f 20 62 6c 6f 63 | 6b 25 21 30 3d 77 68 61 |..? bloc|k%!0=wha|
|00000690| 6e 64 6c 65 31 25 3a c8 | 99 22 57 69 6d 70 5f 43 |ndle1%:.|."Wimp_C|
|000006a0| 6c 6f 73 65 57 69 6e 64 | 6f 77 22 2c 2c 62 6c 6f |loseWind|ow",,blo|
|000006b0| 63 6b 25 3a f2 63 6c 6f | 73 65 61 6c 6c 32 0d 03 |ck%:.clo|seall2..|
|000006c0| bb 06 20 e1 0d 03 ca 10 | 20 f4 2d 2d 2d 2d 2d 2d |.. .....| .------|
|000006d0| 2d 2d 2d 2d 0d 03 d9 10 | 20 dd f2 63 6c 6f 73 65 |----....| ..close|
|000006e0| 61 6c 6c 32 0d 03 e8 32 | 20 62 6c 6f 63 6b 25 21 |all2...2| block%!|
|000006f0| 30 3d 61 63 72 6f 73 73 | 25 3a c8 99 22 57 69 6d |0=across|%:.."Wim|
|00000700| 70 5f 43 6c 6f 73 65 57 | 69 6e 64 6f 77 22 2c 2c |p_CloseW|indow",,|
|00000710| 62 6c 6f 63 6b 25 0d 03 | f7 35 20 62 6c 6f 63 6b |block%..|.5 block|
|00000720| 25 21 30 3d 70 72 69 6e | 74 5f 77 69 6e 25 3a c8 |%!0=prin|t_win%:.|
|00000730| 99 22 57 69 6d 70 5f 43 | 6c 6f 73 65 57 69 6e 64 |."Wimp_C|loseWind|
|00000740| 6f 77 22 2c 2c 62 6c 6f | 63 6b 25 0d 04 06 06 20 |ow",,blo|ck%.... |
|00000750| e1 0d 04 15 10 20 f4 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..... .-|--------|
|00000760| 2d 0d 04 24 13 20 dd f2 | 6d 6f 64 65 5f 63 68 61 |-..$. ..|mode_cha|
|00000770| 6e 67 65 64 0d 04 33 19 | 20 e7 20 6f 6c 64 5f 73 |nged..3.| . old_s|
|00000780| 74 79 6c 65 5f 6d 6f 64 | 65 3d eb 20 e1 0d 04 42 |tyle_mod|e=. ...B|
|00000790| 3f 20 62 6c 6f 63 6b 25 | 21 30 3d 77 68 61 6e 64 |? block%|!0=whand|
|000007a0| 6c 65 31 25 3a c8 99 22 | 57 69 6d 70 5f 43 6c 6f |le1%:.."|Wimp_Clo|
|000007b0| 73 65 57 69 6e 64 6f 77 | 22 2c 2c 62 6c 6f 63 6b |seWindow|",,block|
|000007c0| 25 3a f2 6d 69 6e 69 5f | 70 6f 6c 6c 0d 04 51 27 |%:.mini_|poll..Q'|
|000007d0| 20 f2 66 69 6e 64 5f 64 | 69 6d 65 6e 3a f2 6f 70 | .find_d|imen:.op|
|000007e0| 65 6e 77 69 6e 64 6f 77 | 28 77 68 61 6e 64 6c 65 |enwindow|(whandle|
|000007f0| 31 25 29 0d 04 60 24 20 | f2 6d 69 6e 69 5f 70 6f |1%)..`$ |.mini_po|
|00000800| 6c 6c 3a 67 72 61 62 62 | 65 64 3d a3 3a f2 63 6c |ll:grabb|ed=.:.cl|
|00000810| 6f 73 65 61 6c 6c 32 0d | 04 6f 3d 20 c8 99 22 57 |oseall2.|.o= .."W|
|00000820| 69 6d 70 5f 46 6f 72 63 | 65 52 65 64 72 61 77 22 |imp_Forc|eRedraw"|
|00000830| 2c 77 68 61 6e 64 6c 65 | 31 25 2c 30 2c 2d 28 38 |,whandle|1%,0,-(8|
|00000840| 36 38 2a 74 78 73 29 2c | 28 31 31 32 30 2a 74 78 |68*txs),|(1120*tx|
|00000850| 73 29 2c 30 0d 04 7e 06 | 20 e1 0d 04 8d 10 20 f4 |s),0..~.| ..... .|
|00000860| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 04 9c 14 20 dd |--------|--.... .|
|00000870| f2 6d 6f 64 65 5f 63 68 | 61 6e 67 65 64 32 0d 04 |.mode_ch|anged2..|
|00000880| ab 19 20 e7 20 6f 6c 64 | 5f 73 74 79 6c 65 5f 6d |.. . old|_style_m|
|00000890| 6f 64 65 3d eb 20 e1 0d | 04 ba 1a 20 67 72 61 62 |ode=. ..|... grab|
|000008a0| 62 65 64 3d a3 3a f2 66 | 69 6e 64 5f 64 69 6d 65 |bed=.:.f|ind_dime|
|000008b0| 6e 0d 04 c9 06 20 e1 0d | 04 d8 10 20 f4 2d 2d 2d |n.... ..|... .---|
|000008c0| 2d 2d 2d 2d 2d 2d 2d 0d | 04 e7 10 20 dd f2 6d 69 |-------.|... ..mi|
|000008d0| 6e 69 5f 70 6f 6c 6c 0d | 04 f6 08 20 54 3d 30 0d |ni_poll.|... T=0.|
|000008e0| 05 05 06 20 f5 0d 05 14 | 28 20 20 c8 99 22 57 69 |... ....|(  .."Wi|
|000008f0| 6d 70 5f 50 6f 6c 6c 22 | 2c 26 30 30 2c 62 6c 6f |mp_Poll"|,&00,blo|
|00000900| 63 6b 25 20 b8 20 72 65 | 61 73 6f 6e 25 0d 05 23 |ck% . re|ason%..#|
|00000910| 12 20 20 c8 8e 20 72 65 | 61 73 6f 6e 25 20 ca 0d |.  .. re|ason% ..|
|00000920| 05 32 13 20 20 20 c9 20 | 31 20 3a f2 72 65 64 72 |.2.   . |1 :.redr|
|00000930| 61 77 0d 05 41 27 20 20 | 20 c9 20 32 20 3a c8 99 |aw..A'  | . 2 :..|
|00000940| 22 57 69 6d 70 5f 4f 70 | 65 6e 57 69 6e 64 6f 77 |"Wimp_Op|enWindow|
|00000950| 22 2c 2c 62 6c 6f 63 6b | 25 0d 05 50 07 20 20 cb |",,block|%..P.  .|
|00000960| 0d 05 5f 0a 20 20 54 2b | 3d 31 0d 05 6e 0a 20 fd |.._.  T+|=1..n. .|
|00000970| 20 54 3e 33 0d 05 7d 06 | 20 e1 0d 05 8c 10 20 f4 | T>3..}.| ..... .|
|00000980| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 05 9b 0b 20 dd |--------|--.... .|
|00000990| f2 70 6f 6c 6c 0d 05 aa | 10 20 f2 63 68 65 63 6b |.poll...|. .check|
|000009a0| 5f 6e 61 6d 65 0d 05 b9 | 27 20 c8 99 22 57 69 6d |_name...|' .."Wim|
|000009b0| 70 5f 50 6f 6c 6c 22 2c | 26 30 30 2c 62 6c 6f 63 |p_Poll",|&00,bloc|
|000009c0| 6b 25 20 b8 20 72 65 61 | 73 6f 6e 25 0d 05 c8 11 |k% . rea|son%....|
|000009d0| 20 c8 8e 20 72 65 61 73 | 6f 6e 25 20 ca 0d 05 d7 | .. reas|on% ....|
|000009e0| 12 20 20 c9 20 31 20 3a | f2 72 65 64 72 61 77 0d |.  . 1 :|.redraw.|
|000009f0| 05 e6 26 20 20 c9 20 32 | 20 3a c8 99 22 57 69 6d |..&  . 2| :.."Wim|
|00000a00| 70 5f 4f 70 65 6e 57 69 | 6e 64 6f 77 22 2c 2c 62 |p_OpenWi|ndow",,b|
|00000a10| 6c 6f 63 6b 25 0d 05 f5 | 17 20 20 c9 20 33 20 3a |lock%...|.  . 3 :|
|00000a20| f2 77 68 69 63 68 5f 63 | 6c 6f 73 65 0d 06 04 15 |.which_c|lose....|
|00000a30| 20 20 c9 20 36 20 3a f2 | 65 64 69 74 6d 6f 75 73 |  . 6 :.|editmous|
|00000a40| 65 0d 06 13 14 20 20 c9 | 20 37 20 3a f2 63 61 6c |e....  .| 7 :.cal|
|00000a50| 6c 73 61 76 65 0d 06 22 | 14 20 20 c9 20 38 20 3a |lsave.."|.  . 8 :|
|00000a60| f2 6b 65 79 70 72 65 73 | 73 0d 06 31 18 20 20 c9 |.keypres|s..1.  .|
|00000a70| 20 39 20 3a f2 6f 70 74 | 69 6f 6e 73 65 6c 65 63 | 9 :.opt|ionselec|
|00000a80| 74 0d 06 40 1a 20 20 c9 | 20 31 37 2c 31 38 3a f2 |t..@.  .| 17,18:.|
|00000a90| 72 65 63 65 69 76 65 64 | 61 74 61 0d 06 4f 06 20 |received|ata..O. |
|00000aa0| cb 0d 06 5e 06 20 e1 0d | 06 6d 10 20 f4 2d 2d 2d |...^. ..|.m. .---|
|00000ab0| 2d 2d 2d 2d 2d 2d 2d 0d | 06 7c 12 20 dd f2 77 68 |-------.|.|. ..wh|
|00000ac0| 69 63 68 5f 63 6c 6f 73 | 65 0d 06 8b 41 20 e7 20 |ich_clos|e...A . |
|00000ad0| 62 6c 6f 63 6b 25 21 30 | 3c 3e 77 68 61 6e 64 6c |block%!0|<>whandl|
|00000ae0| 65 31 25 20 c8 99 22 57 | 69 6d 70 5f 53 65 74 43 |e1% .."W|imp_SetC|
|00000af0| 61 72 65 74 50 6f 73 69 | 74 69 6f 6e 22 2c 77 68 |aretPosi|tion",wh|
|00000b00| 61 6e 64 6c 65 31 25 2c | 2d 31 0d 06 9a 2d 20 e7 |andle1%,|-1...- .|
|00000b10| 20 62 6c 6f 63 6b 25 21 | 30 3d 77 68 61 6e 64 6c | block%!|0=whandl|
|00000b20| 65 31 25 20 f2 63 6c 6f | 73 65 61 6c 6c 3a 63 6c |e1% .clo|seall:cl|
|00000b30| 6f 73 65 64 25 3d b9 0d | 06 a9 34 20 e7 20 62 6c |osed%=..|..4 . bl|
|00000b40| 6f 63 6b 25 21 30 3d 61 | 63 72 6f 73 73 25 3a c8 |ock%!0=a|cross%:.|
|00000b50| 99 22 57 69 6d 70 5f 43 | 6c 6f 73 65 57 69 6e 64 |."Wimp_C|loseWind|
|00000b60| 6f 77 22 2c 2c 62 6c 6f | 63 6b 25 0d 06 b8 37 20 |ow",,blo|ck%...7 |
|00000b70| e7 20 62 6c 6f 63 6b 25 | 21 30 3d 70 72 69 6e 74 |. block%|!0=print|
|00000b80| 5f 77 69 6e 25 20 c8 99 | 22 57 69 6d 70 5f 43 6c |_win% ..|"Wimp_Cl|
|00000b90| 6f 73 65 57 69 6e 64 6f | 77 22 2c 2c 62 6c 6f 63 |oseWindo|w",,bloc|
|00000ba0| 6b 25 0d 06 c7 06 20 e1 | 0d 06 d6 11 20 f4 2d 2d |k%.... .|.... .--|
|00000bb0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 06 e5 12 20 dd f2 |--------|-.... ..|
|00000bc0| 72 65 63 65 69 76 65 64 | 61 74 61 0d 06 f4 13 20 |received|ata.... |
|00000bd0| c8 8e 20 62 6c 6f 63 6b | 25 21 31 36 20 ca 0d 07 |.. block|%!16 ...|
|00000be0| 03 11 20 20 c9 20 30 3a | 71 75 69 74 25 3d b9 0d |..  . 0:|quit%=..|
|00000bf0| 07 12 18 20 20 c9 20 31 | 3a f2 64 61 74 61 5f 73 |...  . 1|:.data_s|
|00000c00| 61 76 65 5f 72 65 63 0d | 07 21 13 20 20 c9 20 32 |ave_rec.|.!.  . 2|
|00000c10| 3a f2 73 61 76 65 64 61 | 74 61 0d 07 30 0f 20 20 |:.saveda|ta..0.  |
|00000c20| c9 20 33 3a f2 64 72 61 | 67 0d 07 3f 16 20 20 c9 |. 3:.dra|g..?.  .|
|00000c30| 20 35 3a f2 64 6f 75 62 | 6c 65 63 6c 69 63 6b 0d | 5:.doub|leclick.|
|00000c40| 07 4e 1c 20 20 c9 20 26 | 34 30 30 43 31 3a f2 6d |.N.  . &|400C1:.m|
|00000c50| 6f 64 65 5f 63 68 61 6e | 67 65 64 0d 07 5d 18 20 |ode_chan|ged..]. |
|00000c60| 20 c9 20 26 35 30 32 3a | f2 69 6e 74 65 72 5f 68 | . &502:|.inter_h|
|00000c70| 65 6c 70 0d 07 6c 06 20 | cb 0d 07 7b 06 20 e1 0d |elp..l. |...{. ..|
|00000c80| 07 8a 10 20 f4 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |... .---|-------.|
|00000c90| 07 99 12 20 dd f2 64 6f | 75 62 6c 65 63 6c 69 63 |... ..do|ubleclic|
|00000ca0| 6b 0d 07 a8 32 20 52 30 | 3d 30 3a 66 69 6c 65 74 |k...2 R0|=0:filet|
|00000cb0| 79 70 65 25 3d 62 6c 6f | 63 6b 25 21 34 30 3a e7 |ype%=blo|ck%!40:.|
|00000cc0| 20 66 69 6c 65 74 79 70 | 65 25 3c 3e 26 32 30 30 | filetyp|e%<>&200|
|00000cd0| 30 20 e1 0d 07 b7 11 20 | 44 4e 24 3d 22 22 3a 61 |0 ..... |DN$="":a|
|00000ce0| 25 3d 2d 31 0d 07 c6 25 | 20 f5 20 61 25 2b 3d 31 |%=-1...%| . a%+=1|
|00000cf0| 3a 62 25 3d 62 6c 6f 63 | 6b 25 3f 28 34 34 2b 61 |:b%=bloc|k%?(44+a|
|00000d00| 25 29 3a fd 20 62 25 3d | 30 0d 07 d5 16 20 62 6c |%):. b%=|0.... bl|
|00000d10| 6f 63 6b 25 3f 28 34 34 | 2b 61 25 29 3d 31 33 0d |ock%?(44|+a%)=13.|
|00000d20| 07 e4 1e 20 44 4e 24 3d | 24 28 62 6c 6f 63 6b 25 |... DN$=|$(block%|
|00000d30| 2b 34 34 29 3a 62 65 72 | 72 6f 72 3d 30 0d 07 f3 |+44):ber|ror=0...|
|00000d40| 32 20 6b 6b 24 3d 44 4e | 24 2b 22 2e 58 77 6f 72 |2 kk$=DN|$+".Xwor|
|00000d50| 64 5f 44 61 74 61 22 3a | c8 99 22 4f 53 5f 46 69 |d_Data":|.."OS_Fi|
|00000d60| 6c 65 22 2c 31 37 2c 6b | 6b 24 20 b8 20 52 30 0d |le",17,k|k$ . R0.|
|00000d70| 08 02 0d 20 e7 20 52 30 | 3d 30 20 e1 0d 08 11 23 |... . R0|=0 ....#|
|00000d80| 20 62 6c 6f 63 6b 25 21 | 31 32 3d 62 6c 6f 63 6b | block%!|12=block|
|00000d90| 25 21 38 3a 62 6c 6f 63 | 6b 25 21 31 36 3d 34 0d |%!8:bloc|k%!16=4.|
|00000da0| 08 20 2c 20 c8 99 22 57 | 69 6d 70 5f 53 65 6e 64 |. , .."W|imp_Send|
|00000db0| 4d 65 73 73 61 67 65 22 | 2c 31 37 2c 62 6c 6f 63 |Message"|,17,bloc|
|00000dc0| 6b 25 2c 62 6c 6f 63 6b | 25 21 34 0d 08 2f 1b 20 |k%,block|%!4../. |
|00000dd0| f2 6f 70 65 6e 77 69 6e | 64 6f 77 28 77 68 61 6e |.openwin|dow(whan|
|00000de0| 64 6c 65 31 25 29 0d 08 | 3e 28 20 f2 6c 6f 61 64 |dle1%)..|>( .load|
|00000df0| 28 44 4e 24 29 3a 24 6e | 61 6d 65 25 3d 44 4e 24 |(DN$):$n|ame%=DN$|
|00000e00| 3a f2 75 70 64 61 74 65 | 5f 74 69 74 6c 65 0d 08 |:.update|_title..|
|00000e10| 4d 06 20 e1 0d 08 5c 10 | 20 f4 2d 2d 2d 2d 2d 2d |M. ...\.| .------|
|00000e20| 2d 2d 2d 2d 0d 08 6b 0b | 20 dd f2 64 72 61 67 0d |----..k.| ..drag.|
|00000e30| 08 7a 25 20 66 69 6c 65 | 74 79 70 65 25 3d 62 6c |.z% file|type%=bl|
|00000e40| 6f 63 6b 25 21 34 30 3a | 44 4e 24 3d 22 22 3a 61 |ock%!40:|DN$="":a|
|00000e50| 25 3d 2d 31 0d 08 89 25 | 20 f5 20 61 25 2b 3d 31 |%=-1...%| . a%+=1|
|00000e60| 3a 62 25 3d 62 6c 6f 63 | 6b 25 3f 28 34 34 2b 61 |:b%=bloc|k%?(44+a|
|00000e70| 25 29 3a fd 20 62 25 3d | 30 0d 08 98 2e 20 62 6c |%):. b%=|0.... bl|
|00000e80| 6f 63 6b 25 3f 28 34 34 | 2b 61 25 29 3d 31 33 3a |ock%?(44|+a%)=13:|
|00000e90| 44 4e 24 3d 24 28 62 6c | 6f 63 6b 25 2b 34 34 29 |DN$=$(bl|ock%+44)|
|00000ea0| 3a 4d 55 24 3d 22 22 0d | 08 a7 23 20 e7 20 66 69 |:MU$="".|..# . fi|
|00000eb0| 6c 65 74 79 70 65 25 3d | 26 32 30 30 30 20 f2 77 |letype%=|&2000 .w|
|00000ec0| 6f 72 64 5f 66 69 6c 65 | 3a e1 0d 08 b6 0f 20 f2 |ord_file|:..... .|
|00000ed0| 64 72 61 67 65 72 72 6f | 72 0d 08 c5 06 20 e1 0d |dragerro|r.... ..|
|00000ee0| 08 d4 10 20 f4 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |... .---|-------.|
|00000ef0| 08 e3 10 20 dd f2 77 6f | 72 64 5f 66 69 6c 65 0d |... ..wo|rd_file.|
|00000f00| 08 f2 32 20 6b 6b 24 3d | 44 4e 24 2b 22 2e 58 77 |..2 kk$=|DN$+".Xw|
|00000f10| 6f 72 64 5f 44 61 74 61 | 22 3a c8 99 22 4f 53 5f |ord_Data|":.."OS_|
|00000f20| 46 69 6c 65 22 2c 31 37 | 2c 6b 6b 24 20 b8 20 52 |File",17|,kk$ . R|
|00000f30| 30 0d 09 01 18 20 e7 20 | 52 30 3d 30 20 f2 64 72 |0.... . |R0=0 .dr|
|00000f40| 61 67 65 72 72 6f 72 3a | e1 0d 09 10 28 20 24 6e |agerror:|....( $n|
|00000f50| 61 6d 65 25 3d 44 4e 24 | 3a f2 75 70 64 61 74 65 |ame%=DN$|:.update|
|00000f60| 5f 74 69 74 6c 65 3a f2 | 6c 6f 61 64 28 44 4e 24 |_title:.|load(DN$|
|00000f70| 29 0d 09 1f 06 20 e1 0d | 09 2e 10 20 f4 2d 2d 2d |).... ..|... .---|
|00000f80| 2d 2d 2d 2d 2d 2d 2d 0d | 09 3d 10 20 dd f2 64 72 |-------.|.=. ..dr|
|00000f90| 61 67 65 72 72 6f 72 0d | 09 4c 1f 20 f2 72 6d 28 |agerror.|.L. .rm(|
|00000fa0| 22 45 52 52 31 22 29 3a | f2 65 72 72 62 6f 78 28 |"ERR1"):|.errbox(|
|00000fb0| 74 65 78 74 24 29 0d 09 | 5b 06 20 e1 0d 09 6a 10 |text$)..|[. ...j.|
|00000fc0| 20 f4 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 09 79 14 | .------|----..y.|
|00000fd0| 20 dd f2 64 61 74 61 5f | 73 61 76 65 5f 72 65 63 | ..data_|save_rec|
|00000fe0| 0d 09 88 11 20 73 63 72 | 61 70 5f 72 65 66 25 3d |.... scr|ap_ref%=|
|00000ff0| 30 0d 09 97 13 20 c8 8e | 20 62 6c 6f 63 6b 25 21 |0.... ..| block%!|
|00001000| 34 30 20 ca 0d 09 a6 10 | 20 c9 20 26 46 46 39 2c |40 .....| . &FF9,|
|00001010| 26 41 46 46 0d 09 b5 39 | 20 20 c8 99 22 58 4f 53 |&AFF...9|  .."XOS|
|00001020| 5f 52 65 61 64 56 61 72 | 56 61 6c 22 2c 22 57 69 |_ReadVar|Val","Wi|
|00001030| 6d 70 24 53 63 72 61 70 | 22 2c 2c 2d 31 2c 30 2c |mp$Scrap|",,-1,0,|
|00001040| 33 20 b8 20 2c 2c 65 78 | 69 73 74 73 25 0d 09 c4 |3 . ,,ex|ists%...|
|00001050| 29 20 20 e7 20 65 78 69 | 73 74 73 25 3d 30 20 8c |)  . exi|sts%=0 .|
|00001060| 20 f2 72 6d 28 22 45 52 | 52 49 22 29 3a 85 20 31 | .rm("ER|RI"):. 1|
|00001070| 2c 74 65 78 74 24 0d 09 | d3 26 20 20 66 69 6c 65 |,text$..|.&  file|
|00001080| 74 79 70 65 25 3d 62 6c | 6f 63 6b 25 21 34 30 3a |type%=bl|ock%!40:|
|00001090| 44 4e 24 3d 22 22 3a 61 | 25 3d 2d 31 0d 09 e2 26 |DN$="":a|%=-1...&|
|000010a0| 20 20 f5 20 61 25 2b 3d | 31 3a 62 25 3d 62 6c 6f |  . a%+=|1:b%=blo|
|000010b0| 63 6b 25 3f 28 34 34 2b | 61 25 29 3a fd 20 62 25 |ck%?(44+|a%):. b%|
|000010c0| 3d 30 0d 09 f1 28 20 20 | 62 6c 6f 63 6b 25 3f 28 |=0...(  |block%?(|
|000010d0| 34 34 2b 61 25 29 3d 31 | 33 3a 44 4e 24 3d 24 28 |44+a%)=1|3:DN$=$(|
|000010e0| 62 6c 6f 63 6b 25 2b 34 | 34 29 0d 0a 00 30 20 20 |block%+4|4)...0  |
|000010f0| 62 6c 6f 63 6b 25 21 30 | 3d 36 30 3a 62 6c 6f 63 |block%!0|=60:bloc|
|00001100| 6b 25 21 31 36 3d 32 3a | 62 6c 6f 63 6b 25 21 31 |k%!16=2:|block%!1|
|00001110| 32 3d 62 6c 6f 63 6b 25 | 21 38 0d 0a 0f 31 20 20 |2=block%|!8...1  |
|00001120| 24 28 62 6c 6f 63 6b 25 | 2b 34 34 29 3d 22 3c 57 |$(block%|+44)="<W|
|00001130| 69 6d 70 24 53 63 72 61 | 70 3e 22 2b bd 30 3a 62 |imp$Scra|p>"+.0:b|
|00001140| 6c 6f 63 6b 25 21 33 36 | 3d 2d 31 0d 0a 1e 3a 20 |lock%!36|=-1...: |
|00001150| 20 c8 99 22 57 69 6d 70 | 5f 53 65 6e 64 4d 65 73 | .."Wimp|_SendMes|
|00001160| 73 61 67 65 22 2c 31 37 | 2c 62 6c 6f 63 6b 25 2c |sage",17|,block%,|
|00001170| 62 6c 6f 63 6b 25 21 34 | 3a 73 63 72 61 70 5f 72 |block%!4|:scrap_r|
|00001180| 65 66 25 3d 31 0d 0a 2d | 06 20 cb 0d 0a 3c 06 20 |ef%=1..-|. ...<. |
|00001190| e1 0d 0a 4b 10 20 f4 2d | 2d 2d 2d 2d 2d 2d 2d 2d |...K. .-|--------|
|000011a0| 2d 0d 0a 5a 0c 20 dd f2 | 6d 6f 75 73 65 0d 0a 69 |-..Z. ..|mouse..i|
|000011b0| 1b 20 78 25 3d 21 62 6c | 6f 63 6b 25 3a 79 25 3d |. x%=!bl|ock%:y%=|
|000011c0| 62 6c 6f 63 6b 25 21 34 | 0d 0a 78 0b 20 c8 8e 20 |block%!4|..x. .. |
|000011d0| b9 20 ca 0d 0a 87 14 20 | 20 c9 20 62 6c 6f 63 6b |. ..... | . block|
|000011e0| 25 21 31 32 3d 2d 32 0d | 0a 96 17 20 20 20 e7 20 |%!12=-2.|...   . |
|000011f0| 62 6c 6f 63 6b 25 21 38 | 20 80 20 32 20 8c 0d 0a |block%!8| . 2 ...|
|00001200| a5 31 20 20 20 f2 72 6d | 28 22 4d 55 49 31 22 29 |.1   .rm|("MUI1")|
|00001210| 3a f2 64 72 61 77 6d 65 | 6e 75 28 6d 65 6e 75 25 |:.drawme|nu(menu%|
|00001220| 2c 74 65 78 74 24 2c 78 | 25 2c 79 25 2c b9 29 0d |,text$,x|%,y%,.).|
|00001230| 0a b4 1f 20 20 cc 20 e7 | 20 62 6c 6f 63 6b 25 21 |...  . .| block%!|
|00001240| 38 20 80 20 35 20 8c 20 | 65 6e 64 25 3d b9 0d 0a |8 . 5 . |end%=...|
|00001250| c3 07 20 20 cd 0d 0a d2 | 06 20 cb 0d 0a e1 06 20 |..  ....|. ..... |
|00001260| e1 0d 0a f0 10 20 f4 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..... .-|--------|
|00001270| 2d 0d 0a ff 10 20 dd f2 | 65 64 69 74 6d 6f 75 73 |-.... ..|editmous|
|00001280| 65 0d 0b 0e 48 20 78 70 | 6f 73 3d 21 62 6c 6f 63 |e...H xp|os=!bloc|
|00001290| 6b 25 3a 79 70 6f 73 3d | 62 6c 6f 63 6b 25 21 34 |k%:ypos=|block%!4|
|000012a0| 3a 62 75 3d 62 6c 6f 63 | 6b 25 21 38 3a 77 69 6e |:bu=bloc|k%!8:win|
|000012b0| 64 25 3d 62 6c 6f 63 6b | 25 21 31 32 3a 69 63 3d |d%=block|%!12:ic=|
|000012c0| 62 6c 6f 63 6b 25 21 31 | 36 0d 0b 1d 0b 20 4d 55 |block%!1|6.... MU|
|000012d0| 24 3d 22 22 0d 0b 2c 18 | 20 e7 20 77 69 6e 64 25 |$=""..,.| . wind%|
|000012e0| 3d 2d 32 20 80 20 62 75 | 3d 32 20 8c 0d 0b 3b 11 |=-2 . bu|=2 ...;.|
|000012f0| 20 20 f2 72 6d 28 22 4d | 55 49 31 22 29 0d 0b 4a |  .rm("M|UI1")..J|
|00001300| 35 20 20 f2 64 72 61 77 | 6d 65 6e 75 28 6d 65 6e |5  .draw|menu(men|
|00001310| 75 25 2c 74 65 78 74 24 | 2c 78 70 6f 73 2c 79 70 |u%,text$|,xpos,yp|
|00001320| 6f 73 2c b9 29 3a 4d 55 | 24 3d 22 69 63 6f 6e 22 |os,.):MU|$="icon"|
|00001330| 3a e1 0d 0b 59 06 20 cd | 0d 0b 68 04 0d 0b 77 0f |:...Y. .|..h...w.|
|00001340| 20 c8 8e 20 77 69 6e 64 | 25 20 ca 0d 0b 86 25 20 | .. wind|% ....% |
|00001350| f4 20 20 20 20 20 20 20 | 20 20 20 2a 2a 2a 2a 20 |.       |   **** |
|00001360| 4d 61 69 6e 20 57 69 6e | 64 6f 77 20 2a 2a 2a 2a |Main Win|dow ****|
|00001370| 0d 0b 95 10 20 c9 20 77 | 68 61 6e 64 6c 65 31 25 |.... . w|handle1%|
|00001380| 0d 0b a4 5e 20 e7 20 62 | 75 3d 32 20 80 20 69 63 |...^ . b|u=2 . ic|
|00001390| 3c 30 20 f2 6d 61 69 6e | 6d 65 6e 75 28 6d 6d 65 |<0 .main|menu(mme|
|000013a0| 6e 75 25 29 3a c8 99 22 | 57 69 6d 70 5f 43 72 65 |nu%):.."|Wimp_Cre|
|000013b0| 61 74 65 4d 65 6e 75 22 | 2c 2c 6d 6d 65 6e 75 25 |ateMenu"|,,mmenu%|
|000013c0| 2c 78 70 6f 73 2d 35 31 | 2c 79 70 6f 73 3a 4d 55 |,xpos-51|,ypos:MU|
|000013d0| 24 3d 22 6d 61 69 6e 6d | 65 6e 75 22 3a e1 0d 0b |$="mainm|enu":...|
|000013e0| b3 2b 20 c8 99 22 57 69 | 6d 70 5f 53 65 74 43 61 |.+ .."Wi|mp_SetCa|
|000013f0| 72 65 74 50 6f 73 69 74 | 69 6f 6e 22 2c 77 68 61 |retPosit|ion",wha|
|00001400| 6e 64 6c 65 31 25 2c 2d | 31 0d 0b c2 36 20 62 6c |ndle1%,-|1...6 bl|
|00001410| 6f 63 6b 25 21 30 3d 77 | 68 61 6e 64 6c 65 31 25 |ock%!0=w|handle1%|
|00001420| 3a c8 99 22 57 69 6d 70 | 5f 47 65 74 57 69 6e 64 |:.."Wimp|_GetWind|
|00001430| 6f 77 49 6e 66 6f 22 2c | 2c 62 6c 6f 63 6b 25 0d |owInfo",|,block%.|
|00001440| 0b d1 1f 20 f2 67 65 74 | 6f 72 69 67 69 6e 28 62 |... .get|origin(b|
|00001450| 6c 6f 63 6b 25 2c 78 30 | 25 2c 79 30 25 29 0d 0b |lock%,x0|%,y0%)..|
|00001460| e0 04 0d 0b ef 16 20 e7 | 20 66 69 6c 65 5f 6c 6f |...... .| file_lo|
|00001470| 61 64 65 64 3d b9 20 8c | 0d 0b fe 37 20 20 63 5f |aded=. .|...7  c_|
|00001480| 78 3d 78 70 6f 73 2d 78 | 30 25 2d 67 72 69 64 5f |x=xpos-x|0%-grid_|
|00001490| 78 3a 63 5f 79 3d 79 70 | 6f 73 2d 79 30 25 2b 28 |x:c_y=yp|os-y0%+(|
|000014a0| 38 36 38 2a 74 78 73 29 | 2d 67 72 69 64 5f 79 0d |868*txs)|-grid_y.|
|000014b0| 0c 0d 22 20 20 e7 20 63 | 5f 78 3e 30 20 80 20 63 |.."  . c|_x>0 . c|
|000014c0| 5f 78 3c 28 41 56 2a 67 | 72 69 64 5f 73 7a 29 20 |_x<(AV*g|rid_sz) |
|000014d0| 8c 0d 0c 1c 23 20 20 20 | e7 20 63 5f 79 3e 30 20 |....#   |. c_y>0 |
|000014e0| 80 20 63 5f 79 3c 28 41 | 56 2a 67 72 69 64 5f 73 |. c_y<(A|V*grid_s|
|000014f0| 7a 29 20 8c 0d 0c 2b 31 | 20 20 20 20 63 5f 78 3d |z) ...+1|    c_x=|
|00001500| 31 2b a8 28 63 5f 78 2f | 67 72 69 64 5f 73 7a 29 |1+.(c_x/|grid_sz)|
|00001510| 3a 63 5f 79 3d 31 2b a8 | 28 63 5f 79 2f 67 72 69 |:c_y=1+.|(c_y/gri|
|00001520| 64 5f 73 7a 29 0d 0c 3a | 13 20 20 20 20 f2 63 6c |d_sz)..:|.    .cl|
|00001530| 69 63 6b 5f 67 72 69 64 | 0d 0c 49 08 20 20 20 cd |ick_grid|..I.   .|
|00001540| 0d 0c 58 07 20 20 cd 0d | 0c 67 06 20 cd 0d 0c 76 |..X.  ..|.g. ...v|
|00001550| 26 20 f4 20 20 20 20 20 | 20 20 20 20 20 2a 2a 2a |& .     |     ***|
|00001560| 20 4f 74 68 65 72 20 77 | 69 6e 64 6f 77 73 20 2a | Other w|indows *|
|00001570| 2a 2a 2a 0d 0c 85 11 20 | c9 20 70 72 69 6e 74 5f |***.... |. print_|
|00001580| 77 69 6e 25 0d 0c 94 0d | 20 e7 20 69 63 3d 38 20 |win%....| . ic=8 |
|00001590| 8c 0d 0c a3 2c 20 20 f2 | 7a 32 28 30 2c 70 72 69 |....,  .|z2(0,pri|
|000015a0| 6e 74 5f 77 69 6e 25 29 | 3a f2 69 72 65 61 64 28 |nt_win%)|:.iread(|
|000015b0| 32 2c 70 72 69 6e 74 5f | 77 69 6e 25 29 0d 0c b2 |2,print_|win%)...|
|000015c0| 39 20 20 e7 20 61 24 3c | 3e 22 22 20 f2 70 72 69 |9  . a$<|>"" .pri|
|000015d0| 6e 74 5f 63 74 72 6c 20 | 8b 20 f2 72 6d 28 22 45 |nt_ctrl |. .rm("E|
|000015e0| 52 52 32 22 29 3a f2 65 | 72 72 62 6f 78 28 74 65 |RR2"):.e|rrbox(te|
|000015f0| 78 74 24 29 3a e1 0d 0c | c1 36 20 20 62 6c 6f 63 |xt$):...|.6  bloc|
|00001600| 6b 25 21 30 3d 70 72 69 | 6e 74 5f 77 69 6e 25 3a |k%!0=pri|nt_win%:|
|00001610| c8 99 22 57 69 6d 70 5f | 43 6c 6f 73 65 57 69 6e |.."Wimp_|CloseWin|
|00001620| 64 6f 77 22 2c 2c 62 6c | 6f 63 6b 25 0d 0c d0 2e |dow",,bl|ock%....|
|00001630| 20 20 c8 99 22 57 69 6d | 70 5f 53 65 74 43 61 72 |  .."Wim|p_SetCar|
|00001640| 65 74 50 6f 73 69 74 69 | 6f 6e 22 2c 77 68 61 6e |etPositi|on",whan|
|00001650| 64 6c 65 31 25 2c 2d 31 | 3a e1 0d 0c df 06 20 cd |dle1%,-1|:..... .|
|00001660| 0d 0c ee 0d 20 e7 20 69 | 63 3d 39 20 8c 0d 0c fd |.... . i|c=9 ....|
|00001670| 48 20 20 f2 7a 33 28 31 | 2c 70 72 69 6e 74 5f 77 |H  .z3(1|,print_w|
|00001680| 69 6e 25 29 3a 62 6c 6f | 63 6b 25 21 30 3d 70 72 |in%):blo|ck%!0=pr|
|00001690| 69 6e 74 5f 77 69 6e 25 | 3a c8 99 22 57 69 6d 70 |int_win%|:.."Wimp|
|000016a0| 5f 43 6c 6f 73 65 57 69 | 6e 64 6f 77 22 2c 2c 62 |_CloseWi|ndow",,b|
|000016b0| 6c 6f 63 6b 25 0d 0d 0c | 2e 20 20 c8 99 22 57 69 |lock%...|.  .."Wi|
|000016c0| 6d 70 5f 53 65 74 43 61 | 72 65 74 50 6f 73 69 74 |mp_SetCa|retPosit|
|000016d0| 69 6f 6e 22 2c 77 68 61 | 6e 64 6c 65 31 25 2c 2d |ion",wha|ndle1%,-|
|000016e0| 31 3a e1 0d 0d 1b 06 20 | cd 0d 0d 2a 14 20 e7 20 |1:..... |...*. . |
|000016f0| 69 63 3d 36 20 84 20 69 | 63 3d 37 20 8c 0d 0d 39 |ic=6 . i|c=7 ...9|
|00001700| 1f 20 20 70 72 69 6e 74 | 5f 70 61 75 73 65 3d ac |.  print|_pause=.|
|00001710| 20 70 72 69 6e 74 5f 70 | 61 75 73 65 0d 0d 48 50 | print_p|ause..HP|
|00001720| 20 20 e7 20 70 72 69 6e | 74 5f 70 61 75 73 65 3d |  . prin|t_pause=|
|00001730| b9 20 f2 69 73 65 74 28 | 36 2c 22 6f 70 74 6f 6e |. .iset(|6,"opton|
|00001740| 22 2c 70 72 69 6e 74 5f | 77 69 6e 25 29 20 8b 20 |",print_|win%) . |
|00001750| f2 69 73 65 74 28 36 2c | 22 6f 70 74 6f 66 66 22 |.iset(6,|"optoff"|
|00001760| 2c 70 72 69 6e 74 5f 77 | 69 6e 25 29 0d 0d 57 06 |,print_w|in%)..W.|
|00001770| 20 cd 0d 0d 66 06 20 cb | 0d 0d 75 06 20 e1 0d 0d | ...f. .|..u. ...|
|00001780| 84 10 20 f4 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 0d |.. .----|------..|
|00001790| 93 14 20 dd f2 63 61 72 | 65 74 28 43 25 2c 77 68 |.. ..car|et(C%,wh|
|000017a0| 25 29 0d 0d a2 13 20 f2 | 69 72 65 61 64 28 43 25 |%).... .|iread(C%|
|000017b0| 2c 77 68 25 29 0d 0d b1 | 1d 20 e7 20 61 24 3d 22 |,wh%)...|. . a$="|
|000017c0| 22 20 77 77 68 3d 2d 31 | 20 8b 20 77 77 68 3d a9 |" wwh=-1| . wwh=.|
|000017d0| 61 24 0d 0d c0 30 20 c8 | 99 20 22 57 69 6d 70 5f |a$...0 .|. "Wimp_|
|000017e0| 53 65 74 43 61 72 65 74 | 50 6f 73 69 74 69 6f 6e |SetCaret|Position|
|000017f0| 22 2c 77 68 25 2c 43 25 | 2c 30 2c 2c 2d 31 2c 77 |",wh%,C%|,0,,-1,w|
|00001800| 77 68 0d 0d cf 06 20 e1 | 0d 0d de 10 20 f4 2d 2d |wh.... .|.... .--|
|00001810| 2d 2d 2d 2d 2d 2d 2d 2d | 0d 0d ed 28 20 dd f2 70 |--------|...( ..p|
|00001820| 69 63 74 75 72 65 28 58 | 53 49 5a 45 2c 59 53 49 |icture(X|SIZE,YSI|
|00001830| 5a 45 2c 73 73 73 70 61 | 63 65 2c 73 73 73 24 29 |ZE,ssspa|ce,sss$)|
|00001840| 0d 0d fc 08 20 ea 20 85 | 0d 0e 0b 10 20 ee 20 85 |.... . .|.... . .|
|00001850| 20 ea 3a f7 20 85 3a e1 | 0d 0e 1a 13 20 24 73 70 | .:. .:.|.... $sp|
|00001860| 72 6e 61 6d 65 25 3d 73 | 73 73 24 0d 0e 29 10 20 |rname%=s|ss$..). |
|00001870| e7 20 73 73 73 24 3d 22 | 22 20 8c 0d 0e 38 37 20 |. sss$="|" ...87 |
|00001880| 20 c8 99 22 4f 53 5f 53 | 70 72 69 74 65 4f 70 22 | .."OS_S|priteOp"|
|00001890| 2c 32 36 39 2c 73 73 73 | 70 61 63 65 2c 73 70 72 |,269,sss|pace,spr|
|000018a0| 6e 61 6d 65 25 2c 31 33 | 2c 31 20 b8 20 2c 2c 2c |name%,13|,1 . ,,,|
|000018b0| 52 33 0d 0e 47 17 20 20 | 3f 28 73 70 72 6e 61 6d |R3..G.  |?(sprnam|
|000018c0| 65 25 2b 52 33 29 3d 31 | 33 0d 0e 56 06 20 cd 0d |e%+R3)=1|3..V. ..|
|000018d0| 0e 65 33 20 c8 99 22 4f | 53 5f 53 70 72 69 74 65 |.e3 .."O|S_Sprite|
|000018e0| 4f 70 22 2c 32 38 30 2c | 73 73 73 70 61 63 65 2c |Op",280,|ssspace,|
|000018f0| 24 73 70 72 6e 61 6d 65 | 25 20 b8 20 2c 2c 61 64 |$sprname|% . ,,ad|
|00001900| 64 25 0d 0e 74 3a 20 c8 | 99 22 4f 53 5f 53 70 72 |d%..t: .|."OS_Spr|
|00001910| 69 74 65 4f 70 22 2c 35 | 35 32 2c 73 73 73 70 61 |iteOp",5|52,ssspa|
|00001920| 63 65 2c 61 64 64 25 20 | b8 20 2c 2c 2c 73 78 25 |ce,add% |. ,,,sx%|
|00001930| 2c 73 79 25 2c 2c 73 6d | 6f 64 65 25 0d 0e 83 24 |,sy%,,sm|ode%...$|
|00001940| 20 65 25 3d 28 61 64 64 | 25 21 33 32 2d 34 34 29 | e%=(add|%!32-44)|
|00001950| 2f 38 3a 70 61 6c 25 3d | 70 61 6c 62 75 66 66 25 |/8:pal%=|palbuff%|
|00001960| 0d 0e 92 0c 20 c8 8e 20 | 65 25 20 ca 0d 0e a1 09 |.... .. |e% .....|
|00001970| 20 20 c9 20 30 0d 0e b0 | 2e 20 20 c8 99 22 4f 53 |  . 0...|.  .."OS|
|00001980| 5f 52 65 61 64 4d 6f 64 | 65 56 61 72 69 61 62 6c |_ReadMod|eVariabl|
|00001990| 65 22 2c 73 6d 6f 64 65 | 25 2c 39 20 b8 20 2c 2c |e",smode|%,9 . ,,|
|000019a0| 70 70 25 0d 0e bf 0e 20 | 20 c8 8e 20 70 70 25 20 |pp%.... | .. pp% |
|000019b0| ca 0d 0e ce 13 20 20 20 | c9 20 30 3a 70 61 6c 25 |.....   |. 0:pal%|
|000019c0| 3d 70 30 25 0d 0e dd 13 | 20 20 20 c9 20 31 3a 70 |=p0%....|   . 1:p|
|000019d0| 61 6c 25 3d 70 31 25 0d | 0e ec 13 20 20 20 c9 20 |al%=p1%.|...   . |
|000019e0| 32 3a 70 61 6c 25 3d 70 | 32 25 0d 0e fb 13 20 20 |2:pal%=p|2%....  |
|000019f0| 20 c9 20 33 3a 70 61 6c | 25 3d 70 33 25 0d 0f 0a | . 3:pal|%=p3%...|
|00001a00| 06 20 cb 0d 0f 19 04 0d | 0f 28 0d 20 c9 20 32 2c |. ......|.(. . 2,|
|00001a10| 34 2c 31 36 0d 0f 37 13 | 20 20 e3 20 69 25 3d 30 |4,16..7.|  . i%=0|
|00001a20| 20 b8 20 65 25 2d 31 0d | 0f 46 20 20 20 70 61 6c | . e%-1.|.F   pal|
|00001a30| 25 21 28 69 25 2a 34 29 | 3d 61 64 64 25 21 28 34 |%!(i%*4)|=add%!(4|
|00001a40| 34 2b 69 25 2a 38 29 0d | 0f 55 0a 20 20 ed 20 69 |4+i%*8).|.U.  . i|
|00001a50| 25 0d 0f 64 09 20 c9 20 | 36 34 0d 0f 73 3e 20 20 |%..d. . |64..s>  |
|00001a60| e3 20 67 72 61 62 25 3d | 30 20 b8 20 32 30 34 38 |. grab%=|0 . 2048|
|00001a70| 2d 38 20 88 20 38 3a 70 | 61 6c 25 21 28 67 72 61 |-8 . 8:p|al%!(gra|
|00001a80| 62 25 3e 3e 31 29 3d 61 | 64 64 25 21 28 67 72 61 |b%>>1)=a|dd%!(gra|
|00001a90| 62 25 2b 34 34 29 3a ed | 0d 0f 82 06 20 cb 0d 0f |b%+44):.|.... ...|
|00001aa0| 91 12 20 e7 20 73 6d 6f | 64 65 25 3d 2d 31 20 e1 |.. . smo|de%=-1 .|
|00001ab0| 0d 0f a0 42 20 e7 20 65 | 25 3c 36 34 20 c8 99 22 |...B . e|%<64 .."|
|00001ac0| 43 6f 6c 6f 75 72 54 72 | 61 6e 73 5f 53 65 6c 65 |ColourTr|ans_Sele|
|00001ad0| 63 74 54 61 62 6c 65 22 | 2c 73 6d 6f 64 65 25 2c |ctTable"|,smode%,|
|00001ae0| 70 61 6c 25 2c 2d 31 2c | 2d 31 2c 74 72 61 6e 73 |pal%,-1,|-1,trans|
|00001af0| 32 25 0d 0f af 0e 20 e7 | 20 65 25 3e 36 33 20 8c |2%.... .| e%>63 .|
|00001b00| 0d 0f be 22 20 20 e3 20 | 51 25 3d 30 20 b8 20 32 |..."  . |Q%=0 . 2|
|00001b10| 35 35 3a 74 72 61 6e 73 | 32 25 3f 51 25 3d 51 25 |55:trans|2%?Q%=Q%|
|00001b20| 3a ed 0d 0f cd 12 20 20 | e3 20 51 25 3d 30 20 b8 |:.....  |. Q%=0 .|
|00001b30| 20 32 35 35 0d 0f dc 42 | 20 20 c8 99 22 43 6f 6c | 255...B|  .."Col|
|00001b40| 6f 75 72 54 72 61 6e 73 | 5f 52 65 74 75 72 6e 43 |ourTrans|_ReturnC|
|00001b50| 6f 6c 6f 75 72 4e 75 6d | 62 65 72 22 2c 70 61 6c |olourNum|ber",pal|
|00001b60| 25 21 28 51 25 3c 3c 32 | 29 20 b8 20 74 72 61 6e |%!(Q%<<2|) . tran|
|00001b70| 73 32 25 3f 51 25 0d 0f | eb 07 20 20 ed 0d 0f fa |s2%?Q%..|..  ....|
|00001b80| 3c 20 20 c8 99 22 43 6f | 6c 6f 75 72 54 72 61 6e |<  .."Co|lourTran|
|00001b90| 73 5f 53 65 6c 65 63 74 | 54 61 62 6c 65 22 2c 73 |s_Select|Table",s|
|00001ba0| 6d 6f 64 65 25 2c 70 61 | 6c 25 2c 4b 75 2c 4b 75 |mode%,pa|l%,Ku,Ku|
|00001bb0| 70 2c 74 72 61 6e 73 32 | 25 0d 10 09 06 20 cd 0d |p,trans2|%.... ..|
|00001bc0| 10 18 04 0d 10 27 2e 20 | c8 99 22 4f 53 5f 52 65 |.....'. |.."OS_Re|
|00001bd0| 61 64 4d 6f 64 65 56 61 | 72 69 61 62 6c 65 22 2c |adModeVa|riable",|
|00001be0| 73 6d 6f 64 65 25 2c 34 | 20 b8 20 2c 2c 78 6d 61 |smode%,4| . ,,xma|
|00001bf0| 67 0d 10 36 2e 20 c8 99 | 22 4f 53 5f 52 65 61 64 |g..6. ..|"OS_Read|
|00001c00| 4d 6f 64 65 56 61 72 69 | 61 62 6c 65 22 2c 73 6d |ModeVari|able",sm|
|00001c10| 6f 64 65 25 2c 35 20 b8 | 20 2c 2c 79 6d 61 67 0d |ode%,5 .| ,,ymag.|
|00001c20| 10 45 24 20 73 78 25 3d | 28 73 78 25 3c 3c 78 6d |.E$ sx%=|(sx%<<xm|
|00001c30| 61 67 29 3a 73 79 25 3d | 28 73 79 25 3c 3c 79 6d |ag):sy%=|(sy%<<ym|
|00001c40| 61 67 29 0d 10 54 2b 20 | c8 99 22 4f 53 5f 52 65 |ag)..T+ |.."OS_Re|
|00001c50| 61 64 4d 6f 64 65 56 61 | 72 69 61 62 6c 65 22 2c |adModeVa|riable",|
|00001c60| 2d 31 2c 35 20 b8 20 2c | 2c 79 6d 61 67 32 0d 10 |-1,5 . ,|,ymag2..|
|00001c70| 63 2b 20 c8 99 22 4f 53 | 5f 52 65 61 64 4d 6f 64 |c+ .."OS|_ReadMod|
|00001c80| 65 56 61 72 69 61 62 6c | 65 22 2c 2d 31 2c 34 20 |eVariabl|e",-1,4 |
|00001c90| b8 20 2c 2c 78 6d 61 67 | 32 0d 10 72 2e 20 e7 20 |. ,,xmag|2..r. . |
|00001ca0| 70 72 6e 74 5f 73 74 61 | 74 75 73 3d 31 20 78 6d |prnt_sta|tus=1 xm|
|00001cb0| 61 67 32 3d 78 73 74 69 | 6e 74 3a 79 6d 61 67 32 |ag2=xsti|nt:ymag2|
|00001cc0| 3d 79 73 74 69 6e 74 0d | 10 81 04 0d 10 90 31 20 |=ystint.|......1 |
|00001cd0| 66 61 3d 28 32 5e 79 6d | 61 67 32 29 2f 28 32 5e |fa=(2^ym|ag2)/(2^|
|00001ce0| 79 6d 61 67 29 3a 66 61 | 32 3d 28 32 5e 78 6d 61 |ymag):fa|2=(2^xma|
|00001cf0| 67 32 29 2f 28 32 5e 78 | 6d 61 67 29 0d 10 9f 26 |g2)/(2^x|mag)...&|
|00001d00| 20 72 61 74 69 6f 78 3d | 58 53 49 5a 45 2f 73 78 | ratiox=|XSIZE/sx|
|00001d10| 25 3a 72 61 74 69 6f 79 | 3d 59 53 49 5a 45 2f 73 |%:ratioy|=YSIZE/s|
|00001d20| 79 25 0d 10 ae 3e 20 e7 | 20 72 61 74 69 6f 78 3c |y%...> .| ratiox<|
|00001d30| 72 61 74 69 6f 79 20 73 | 66 6e 25 3d 58 53 49 5a |ratioy s|fn%=XSIZ|
|00001d40| 45 3a 73 66 64 25 3d 73 | 78 25 20 8b 20 73 66 6e |E:sfd%=s|x% . sfn|
|00001d50| 25 3d 59 53 49 5a 45 3a | 73 66 64 25 3d 73 79 25 |%=YSIZE:|sfd%=sy%|
|00001d60| 0d 10 bd 3b 20 21 6d 61 | 67 25 3d 73 66 6e 25 3a |...; !ma|g%=sfn%:|
|00001d70| 6d 61 67 25 21 34 3d 73 | 66 6e 25 3a 6d 61 67 25 |mag%!4=s|fn%:mag%|
|00001d80| 21 38 3d 73 66 64 25 2a | 66 61 32 3a 6d 61 67 25 |!8=sfd%*|fa2:mag%|
|00001d90| 21 31 32 3d 73 66 64 25 | 2a 66 61 0d 10 cc 2c 20 |!12=sfd%|*fa..., |
|00001da0| 73 78 25 3d 73 78 25 2a | 28 73 66 6e 25 2f 73 66 |sx%=sx%*|(sfn%/sf|
|00001db0| 64 25 29 3a 73 79 25 3d | 73 79 25 2a 28 73 66 6e |d%):sy%=|sy%*(sfn|
|00001dc0| 25 2f 73 66 64 25 29 0d | 10 db 1a 20 78 73 69 7a |%/sfd%).|... xsiz|
|00001dd0| 65 25 3d 73 78 25 3a 79 | 73 69 7a 65 25 3d 73 79 |e%=sx%:y|size%=sy|
|00001de0| 25 0d 10 ea 08 20 f7 20 | 85 0d 10 f9 06 20 e1 0d |%.... . |..... ..|
|00001df0| 11 08 10 20 f4 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |... .---|-------.|
|00001e00| 11 17 15 20 dd f2 76 65 | 72 69 66 79 73 68 75 74 |... ..ve|rifyshut|
|00001e10| 64 6f 77 6e 0d 11 26 6c | 20 62 6c 6f 63 6b 25 21 |down..&l| block%!|
|00001e20| 30 3d 77 68 61 6e 64 6c | 65 32 25 3a c8 99 22 57 |0=whandl|e2%:.."W|
|00001e30| 69 6d 70 5f 43 6c 6f 73 | 65 57 69 6e 64 6f 77 22 |imp_Clos|eWindow"|
|00001e40| 2c 2c 62 6c 6f 63 6b 25 | 3a 62 6c 6f 63 6b 25 21 |,,block%|:block%!|
|00001e50| 30 3d 77 68 61 6e 64 6c | 65 31 25 3a c8 99 22 57 |0=whandl|e1%:.."W|
|00001e60| 69 6d 70 5f 43 6c 6f 73 | 65 57 69 6e 64 6f 77 22 |imp_Clos|eWindow"|
|00001e70| 2c 2c 62 6c 6f 63 6b 25 | 3a 71 75 69 74 25 3d b9 |,,block%|:quit%=.|
|00001e80| 0d 11 35 06 20 e1 0d 11 | 44 10 20 f4 2d 2d 2d 2d |..5. ...|D. .----|
|00001e90| 2d 2d 2d 2d 2d 2d 0d 11 | 53 13 20 dd f2 6f 70 74 |------..|S. ..opt|
|00001ea0| 69 6f 6e 73 65 6c 65 63 | 74 0d 11 62 34 20 63 68 |ionselec|t..b4 ch|
|00001eb0| 6f 69 63 65 25 3d 21 62 | 6c 6f 63 6b 25 3a 63 68 |oice%=!b|lock%:ch|
|00001ec0| 6f 69 63 65 32 25 3d 62 | 6c 6f 63 6b 25 21 34 3a |oice2%=b|lock%!4:|
|00001ed0| 63 72 65 61 74 65 5f 6d | 65 6e 75 3d 30 0d 11 71 |create_m|enu=0..q|
|00001ee0| 1e 20 f4 53 59 53 22 57 | 69 6d 70 5f 43 72 65 61 |. .SYS"W|imp_Crea|
|00001ef0| 74 65 4d 65 6e 75 22 2c | 2c 2d 31 0d 11 80 24 20 |teMenu",|,-1...$ |
|00001f00| c8 99 22 57 69 6d 70 5f | 47 65 74 50 6f 69 6e 74 |.."Wimp_|GetPoint|
|00001f10| 65 72 49 6e 66 6f 22 2c | 2c 62 6c 6f 63 6b 25 0d |erInfo",|,block%.|
|00001f20| 11 8f 3a 20 78 70 6f 73 | 3d 21 62 6c 6f 63 6b 25 |..: xpos|=!block%|
|00001f30| 3a 79 70 6f 73 3d 62 6c | 6f 63 6b 25 21 34 3a e7 |:ypos=bl|ock%!4:.|
|00001f40| 20 62 6c 6f 63 6b 25 21 | 38 3d 31 20 63 72 65 61 | block%!|8=1 crea|
|00001f50| 74 65 5f 6d 65 6e 75 3d | 31 0d 11 9e 28 20 e7 20 |te_menu=|1...( . |
|00001f60| 4d 55 24 3d 22 6d 61 69 | 6e 6d 65 6e 75 22 20 f2 |MU$="mai|nmenu" .|
|00001f70| 6f 70 74 69 6f 6e 5f 6d | 61 69 6e 6d 65 6e 75 3a |option_m|ainmenu:|
|00001f80| e1 0d 11 ad 18 20 e7 20 | 63 68 6f 69 63 65 25 3d |..... . |choice%=|
|00001f90| 31 20 71 75 69 74 25 3d | b9 0d 11 bc 06 20 e1 0d |1 quit%=|..... ..|
|00001fa0| 11 cb 10 20 f4 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |... .---|-------.|
|00001fb0| 11 da 16 20 dd f2 6f 70 | 74 69 6f 6e 5f 6d 61 69 |... ..op|tion_mai|
|00001fc0| 6e 6d 65 6e 75 0d 11 e9 | 2b 20 e7 20 63 68 6f 69 |nmenu...|+ . choi|
|00001fd0| 63 65 25 3d 30 20 80 20 | 67 61 6d 65 5f 65 6e 64 |ce%=0 . |game_end|
|00001fe0| 3d a3 20 8c 20 f2 67 69 | 76 65 6e 5f 75 70 3a e1 |=. . .gi|ven_up:.|
|00001ff0| 0d 11 f8 25 20 e7 20 63 | 68 6f 69 63 65 25 3d 31 |...% . c|hoice%=1|
|00002000| 20 80 20 67 61 6d 65 5f | 65 6e 64 3d a3 20 f2 61 | . game_|end=. .a|
|00002010| 63 5f 77 69 6e 0d 12 70 | 06 20 e1 0d 12 7f 10 20 |c_win..p|. ..... |
|00002020| f4 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 12 80 0d 20 |.-------|---.... |
|00002030| dd f2 61 63 5f 77 69 6e | 0d 12 81 5e 20 62 6c 6f |..ac_win|...^ blo|
|00002040| 63 6b 33 25 21 30 3d 30 | 3a 62 6c 6f 63 6b 33 25 |ck3%!0=0|:block3%|
|00002050| 21 34 3d 2d 28 36 30 2b | 28 33 36 2a 61 63 72 6f |!4=-(60+|(36*acro|
|00002060| 73 73 5f 6d 61 78 79 29 | 29 3a 62 6c 6f 63 6b 33 |ss_maxy)|):block3|
|00002070| 25 21 38 3d 28 37 38 2b | 28 31 36 2a 61 63 72 6f |%!8=(78+|(16*acro|
|00002080| 73 73 5f 6d 61 78 78 29 | 29 3a 62 6c 6f 63 6b 33 |ss_maxx)|):block3|
|00002090| 25 21 31 32 3d 30 0d 12 | 82 27 20 c8 99 22 57 69 |%!12=0..|.' .."Wi|
|000020a0| 6d 70 5f 53 65 74 45 78 | 74 65 6e 74 22 2c 61 63 |mp_SetEx|tent",ac|
|000020b0| 72 6f 73 73 25 2c 62 6c | 6f 63 6b 33 25 0d 12 83 |ross%,bl|ock3%...|
|000020c0| 34 20 62 6c 6f 63 6b 25 | 21 30 3d 61 63 72 6f 73 |4 block%|!0=acros|
|000020d0| 73 25 3a c8 99 22 57 69 | 6d 70 5f 47 65 74 57 69 |s%:.."Wi|mp_GetWi|
|000020e0| 6e 64 6f 77 49 6e 66 6f | 22 2c 2c 62 6c 6f 63 6b |ndowInfo|",,block|
|000020f0| 25 0d 12 84 2d 20 62 6c | 6f 63 6b 25 21 31 32 3d |%...- bl|ock%!12=|
|00002100| 62 6c 6f 63 6b 25 21 34 | 2b 28 37 38 2b 28 31 36 |block%!4|+(78+(16|
|00002110| 2a 61 63 72 6f 73 73 5f | 6d 61 78 78 29 29 0d 12 |*across_|maxx))..|
|00002120| 85 2d 20 62 6c 6f 63 6b | 25 21 38 3d 62 6c 6f 63 |.- block|%!8=bloc|
|00002130| 6b 25 21 31 36 2d 28 36 | 30 2b 28 33 36 2a 61 63 |k%!16-(6|0+(36*ac|
|00002140| 72 6f 73 73 5f 6d 61 78 | 79 29 29 0d 12 86 20 20 |ross_max|y))...  |
|00002150| c8 99 22 57 69 6d 70 5f | 4f 70 65 6e 57 69 6e 64 |.."Wimp_|OpenWind|
|00002160| 6f 77 22 2c 2c 62 6c 6f | 63 6b 25 0d 12 87 06 20 |ow",,blo|ck%.... |
|00002170| e1 0d 12 88 10 20 f4 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..... .-|--------|
|00002180| 2d 0d 12 8e 0f 20 dd a4 | 54 65 6d 70 28 54 24 29 |-.... ..|Temp(T$)|
|00002190| 0d 12 9d 12 20 24 77 69 | 6e 5f 69 64 65 6e 25 3d |.... $wi|n_iden%=|
|000021a0| 54 24 0d 12 ac 09 20 ea | 20 68 25 0d 12 bb 11 20 |T$.... .| h%.... |
|000021b0| 77 64 61 25 3d 77 64 61 | 74 61 31 25 0d 12 ca 4b |wda%=wda|ta1%...K|
|000021c0| 20 c8 99 22 57 69 6d 70 | 5f 4c 6f 61 64 54 65 6d | .."Wimp|_LoadTem|
|000021d0| 70 6c 61 74 65 22 2c 2c | 62 6c 6f 63 6b 25 2c 77 |plate",,|block%,w|
|000021e0| 64 61 74 61 31 25 2c 77 | 64 31 65 6e 64 25 2c 2d |data1%,w|d1end%,-|
|000021f0| 31 2c 77 69 6e 5f 69 64 | 65 6e 25 20 b8 20 2c 2c |1,win_id|en% . ,,|
|00002200| 77 64 61 74 61 31 25 0d | 12 d9 18 20 62 6c 6f 63 |wdata1%.|... bloc|
|00002210| 6b 25 21 36 34 3d 69 63 | 6f 6e 73 70 61 63 65 0d |k%!64=ic|onspace.|
|00002220| 12 e8 30 20 e7 20 54 24 | 3d 22 4d 61 69 6e 22 20 |..0 . T$|="Main" |
|00002230| 6e 61 6d 65 25 3d 62 6c | 6f 63 6b 25 21 37 32 3a |name%=bl|ock%!72:|
|00002240| 62 6c 6f 63 6b 25 21 31 | 32 3d 74 6f 70 5f 79 0d |block%!1|2=top_y.|
|00002250| 12 f7 6f 20 e7 20 54 24 | 3d 22 63 6c 6f 73 65 64 |..o . T$|="closed|
|00002260| 6f 77 6e 22 20 62 6c 6f | 63 6b 25 21 28 38 38 2b |own" blo|ck%!(88+|
|00002270| 34 2a 33 32 2b 32 34 29 | 3d 69 63 6f 6e 73 70 61 |4*32+24)|=iconspa|
|00002280| 63 65 3a 62 6c 6f 63 6b | 25 21 28 38 38 2b 35 2a |ce:block|%!(88+5*|
|00002290| 33 32 2b 32 34 29 3d 69 | 63 6f 6e 73 70 61 63 65 |32+24)=i|conspace|
|000022a0| 3a 62 6c 6f 63 6b 25 21 | 28 38 38 2b 38 2a 33 32 |:block%!|(88+8*32|
|000022b0| 2b 32 34 29 3d 69 63 6f | 6e 73 70 61 63 65 0d 13 |+24)=ico|nspace..|
|000022c0| 06 2d 20 e7 20 54 24 3d | 22 66 69 6e 22 20 62 6c |.- . T$=|"fin" bl|
|000022d0| 6f 63 6b 25 21 28 38 38 | 2b 34 2a 33 32 2b 32 34 |ock%!(88|+4*32+24|
|000022e0| 29 3d 69 63 6f 6e 73 70 | 61 63 65 0d 13 08 2d 20 |)=iconsp|ace...- |
|000022f0| e7 20 54 24 3d 22 72 65 | 67 22 20 62 6c 6f 63 6b |. T$="re|g" block|
|00002300| 25 21 28 38 38 2b 34 2a | 33 32 2b 32 34 29 3d 69 |%!(88+4*|32+24)=i|
|00002310| 63 6f 6e 73 70 61 63 65 | 0d 13 15 4f 20 e7 20 54 |conspace|...O . T|
|00002320| 24 3d 22 77 61 72 6e 69 | 6e 67 22 20 62 6c 6f 63 |$="warni|ng" bloc|
|00002330| 6b 25 21 28 38 38 2b 34 | 2a 33 32 2b 32 34 29 3d |k%!(88+4|*32+24)=|
|00002340| 69 63 6f 6e 73 70 61 63 | 65 3a 62 6c 6f 63 6b 25 |iconspac|e:block%|
|00002350| 21 28 38 38 2b 35 2a 33 | 32 2b 32 34 29 3d 69 63 |!(88+5*3|2+24)=ic|
|00002360| 6f 6e 73 70 61 63 65 0d | 13 24 30 20 e7 20 54 24 |onspace.|.$0 . T$|
|00002370| 3d 22 65 72 72 62 6f 78 | 22 20 62 6c 6f 63 6b 25 |="errbox|" block%|
|00002380| 21 28 38 38 2b 34 2a 33 | 32 2b 32 34 29 3d 69 63 |!(88+4*3|2+24)=ic|
|00002390| 6f 6e 73 70 61 63 65 0d | 13 33 6b 20 e7 20 54 24 |onspace.|.3k . T$|
|000023a0| 3d 22 63 6c 69 63 6b 22 | 20 62 6c 6f 63 6b 25 21 |="click"| block%!|
|000023b0| 28 38 38 2b 31 2a 33 32 | 2b 32 34 29 3d 69 63 6f |(88+1*32|+24)=ico|
|000023c0| 6e 73 70 61 63 65 3a 62 | 6c 6f 63 6b 25 21 28 38 |nspace:b|lock%!(8|
|000023d0| 38 2b 32 2a 33 32 2b 32 | 34 29 3d 69 63 6f 6e 73 |8+2*32+2|4)=icons|
|000023e0| 70 61 63 65 3a 62 6c 6f | 63 6b 25 21 28 38 38 2b |pace:blo|ck%!(88+|
|000023f0| 38 2a 33 32 2b 32 34 29 | 3d 69 63 6f 6e 73 70 61 |8*32+24)|=iconspa|
|00002400| 63 65 0d 13 42 6b 20 e7 | 20 54 24 3d 22 70 72 69 |ce..Bk .| T$="pri|
|00002410| 6e 74 22 20 62 6c 6f 63 | 6b 25 21 28 38 38 2b 30 |nt" bloc|k%!(88+0|
|00002420| 2a 33 32 2b 32 34 29 3d | 69 63 6f 6e 73 70 61 63 |*32+24)=|iconspac|
|00002430| 65 3a 62 6c 6f 63 6b 25 | 21 28 38 38 2b 31 2a 33 |e:block%|!(88+1*3|
|00002440| 32 2b 32 34 29 3d 69 63 | 6f 6e 73 70 61 63 65 3a |2+24)=ic|onspace:|
|00002450| 62 6c 6f 63 6b 25 21 28 | 38 38 2b 36 2a 33 32 2b |block%!(|88+6*32+|
|00002460| 32 34 29 3d 69 63 6f 6e | 73 70 61 63 65 0d 13 51 |24)=icon|space..Q|
|00002470| 27 20 c8 99 22 57 69 6d | 70 5f 43 72 65 61 74 65 |' .."Wim|p_Create|
|00002480| 57 69 6e 64 6f 77 22 2c | 2c 62 6c 6f 63 6b 25 20 |Window",|,block% |
|00002490| b8 20 68 25 0d 13 60 08 | 20 3d 68 25 0d 13 6f 10 |. h%..`.| =h%..o.|
|000024a0| 20 f4 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 13 7e 0c | .------|----..~.|
|000024b0| 20 dd f2 65 72 72 6f 72 | 0d 13 8d 0e 20 21 62 6c | ..error|.... !bl|
|000024c0| 6f 63 6b 25 3d 9f 0d 13 | 9c 36 20 24 28 62 6c 6f |ock%=...|.6 $(blo|
|000024d0| 63 6b 25 2b 34 29 3d f6 | 24 2b 22 20 28 69 6e 74 |ck%+4)=.|$+" (int|
|000024e0| 65 72 6e 61 6c 20 65 72 | 72 6f 72 20 63 6f 64 65 |ernal er|ror code|
|000024f0| 20 22 2b c3 9e 2b 22 29 | 22 2b bd 30 0d 13 ab 34 | "+..+")|"+.0...4|
|00002500| 20 f2 72 6d 28 22 45 52 | 4d 31 22 29 3a c8 99 22 | .rm("ER|M1"):.."|
|00002510| 57 69 6d 70 5f 52 65 70 | 6f 72 74 45 72 72 6f 72 |Wimp_Rep|ortError|
|00002520| 22 2c 62 6c 6f 63 6b 25 | 2c 31 2c 74 65 78 74 24 |",block%|,1,text$|
|00002530| 0d 13 ba 06 20 e1 0d 13 | c9 10 20 f4 2d 2d 2d 2d |.... ...|.. .----|
|00002540| 2d 2d 2d 2d 2d 2d 0d 13 | d8 10 20 dd a4 77 69 6d |------..|.. ..wim|
|00002550| 70 65 72 72 6f 72 0d 13 | e7 0e 20 21 62 6c 6f 63 |perror..|.. !bloc|
|00002560| 6b 25 3d 9f 0d 13 f6 26 | 20 24 28 62 6c 6f 63 6b |k%=....&| $(block|
|00002570| 25 2b 34 29 3d f6 24 2b | 22 20 28 22 2b c3 9f 2b |%+4)=.$+|" ("+..+|
|00002580| 22 29 20 22 2b c3 9e 2b | bd 30 0d 14 05 34 20 f2 |") "+..+|.0...4 .|
|00002590| 72 6d 28 22 45 52 4d 31 | 22 29 3a c8 99 22 57 69 |rm("ERM1|"):.."Wi|
|000025a0| 6d 70 5f 52 65 70 6f 72 | 74 45 72 72 6f 72 22 2c |mp_Repor|tError",|
|000025b0| 62 6c 6f 63 6b 25 2c 31 | 2c 74 65 78 74 24 0d 14 |block%,1|,text$..|
|000025c0| 14 07 20 3d b9 0d 14 23 | 10 20 f4 2d 2d 2d 2d 2d |.. =...#|. .-----|
|000025d0| 2d 2d 2d 2d 2d 0d 14 32 | 40 20 dd a4 69 63 6f 6e |-----..2|@ ..icon|
|000025e0| 64 65 66 28 77 68 61 6e | 64 6c 65 25 2c 69 78 25 |def(whan|dle%,ix%|
|000025f0| 2c 69 79 25 2c 69 77 25 | 2c 69 68 25 2c 66 6c 61 |,iy%,iw%|,ih%,fla|
|00002600| 67 25 2c 74 65 78 74 24 | 2c 64 31 25 2c 64 32 25 |g%,text$|,d1%,d2%|
|00002610| 2c 64 33 25 29 0d 14 41 | 30 20 62 6c 6f 63 6b 25 |,d3%)..A|0 block%|
|00002620| 21 30 3d 77 68 61 6e 64 | 6c 65 25 3a 62 6c 6f 63 |!0=whand|le%:bloc|
|00002630| 6b 25 21 34 3d 69 78 25 | 3a 62 6c 6f 63 6b 25 21 |k%!4=ix%|:block%!|
|00002640| 38 3d 69 79 25 0d 14 50 | 28 20 62 6c 6f 63 6b 25 |8=iy%..P|( block%|
|00002650| 21 31 32 3d 69 78 25 2b | 69 77 25 3a 62 6c 6f 63 |!12=ix%+|iw%:bloc|
|00002660| 6b 25 21 31 36 3d 69 79 | 25 2b 69 68 25 0d 14 5f |k%!16=iy|%+ih%.._|
|00002670| 14 20 62 6c 6f 63 6b 25 | 21 32 30 3d 66 6c 61 67 |. block%|!20=flag|
|00002680| 25 0d 14 6e 0e 20 e7 20 | 64 31 25 3d 30 20 8c 0d |%..n. . |d1%=0 ..|
|00002690| 14 7d 17 20 24 28 62 6c | 6f 63 6b 25 2b 32 34 29 |.}. $(bl|ock%+24)|
|000026a0| 3d 74 65 78 74 24 0d 14 | 8c 06 20 cc 0d 14 9b 20 |=text$..|.. .... |
|000026b0| 20 62 6c 6f 63 6b 25 21 | 32 34 3d 64 31 25 3a 62 | block%!|24=d1%:b|
|000026c0| 6c 6f 63 6b 25 21 32 38 | 3d 64 32 25 0d 14 aa 12 |lock%!28|=d2%....|
|000026d0| 20 62 6c 6f 63 6b 25 21 | 33 32 3d 64 33 25 0d 14 | block%!|32=d3%..|
|000026e0| b9 06 20 cd 0d 14 c8 2c | 20 c8 99 20 22 57 69 6d |.. ....,| .. "Wim|
|000026f0| 70 5f 43 72 65 61 74 65 | 49 63 6f 6e 22 2c 2c 62 |p_Create|Icon",,b|
|00002700| 6c 6f 63 6b 25 20 b8 20 | 69 68 61 6e 64 6c 65 25 |lock% . |ihandle%|
|00002710| 0d 14 d7 0e 20 3d 69 68 | 61 6e 64 6c 65 25 0d 14 |.... =ih|andle%..|
|00002720| e6 10 20 f4 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 14 |.. .----|------..|
|00002730| f5 15 20 dd f2 6f 70 65 | 6e 77 69 6e 64 6f 77 28 |.. ..ope|nwindow(|
|00002740| 47 25 29 0d 15 04 22 20 | e7 20 47 25 3d 77 68 61 |G%)..." |. G%=wha|
|00002750| 6e 64 6c 65 31 25 20 f2 | 6e 65 77 5f 6d 61 69 6e |ndle1% .|new_main|
|00002760| 5f 73 7a 3a e1 0d 15 13 | 10 20 62 6c 6f 63 6b 25 |_sz:....|. block%|
|00002770| 21 30 3d 47 25 0d 15 22 | 25 20 c8 99 20 22 57 69 |!0=G%.."|% .. "Wi|
|00002780| 6d 70 5f 47 65 74 57 69 | 6e 64 6f 77 53 74 61 74 |mp_GetWi|ndowStat|
|00002790| 65 22 2c 2c 62 6c 6f 63 | 6b 25 0d 15 31 20 20 c8 |e",,bloc|k%..1  .|
|000027a0| 99 22 57 69 6d 70 5f 4f | 70 65 6e 57 69 6e 64 6f |."Wimp_O|penWindo|
|000027b0| 77 22 2c 2c 62 6c 6f 63 | 6b 25 0d 15 40 06 20 e1 |w",,bloc|k%..@. .|
|000027c0| 0d 15 4f 10 20 f4 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..O. .--|--------|
|000027d0| 0d 15 5e 2a 20 dd f2 64 | 72 61 77 6d 65 6e 75 28 |..^* ..d|rawmenu(|
|000027e0| 6d 25 2c 6d 65 6e 75 24 | 2c 78 25 2c 79 25 2c 6f |m%,menu$|,x%,y%,o|
|000027f0| 6e 69 63 6f 6e 62 61 72 | 25 29 0d 15 6d 4a 20 6d |niconbar|%)..mJ m|
|00002800| 25 3f 31 32 3d 37 3a 6d | 25 3f 31 33 3d 32 3a 6d |%?12=7:m|%?13=2:m|
|00002810| 25 3f 31 34 3d 37 3a 6d | 25 3f 31 35 3d 30 3a 6d |%?14=7:m|%?15=0:m|
|00002820| 25 21 31 36 3d 32 30 30 | 3a 6d 25 21 32 30 3d 34 |%!16=200|:m%!20=4|
|00002830| 34 3a 6d 25 21 32 34 3d | 30 3a 70 74 72 25 3d 6d |4:m%!24=|0:ptr%=m|
|00002840| 25 2b 32 38 0d 15 7c 1e | 20 24 6d 25 3d c0 6d 65 |%+28..|.| $m%=.me|
|00002850| 6e 75 24 2c a7 6d 65 6e | 75 24 2c 22 2c 22 29 2d |nu$,.men|u$,",")-|
|00002860| 31 29 0d 15 8b 1a 20 6d | 65 6e 75 24 2b 3d 22 2c |1).... m|enu$+=",|
|00002870| 22 3a 65 6e 74 72 69 65 | 73 25 3d 30 0d 15 9a 11 |":entrie|s%=0....|
|00002880| 20 c8 95 20 6d 65 6e 75 | 24 3c 3e 22 22 0d 15 a9 | .. menu|$<>""...|
|00002890| 20 20 6d 65 6e 75 24 3d | c1 6d 65 6e 75 24 2c a7 |  menu$=|.menu$,.|
|000028a0| 6d 65 6e 75 24 2c 22 2c | 22 29 2b 31 29 0d 15 b8 |menu$,",|")+1)...|
|000028b0| 12 20 e7 20 6d 65 6e 75 | 24 3c 3e 22 22 20 8c 0d |. . menu|$<>"" ..|
|000028c0| 15 c7 27 20 70 74 72 25 | 21 30 3d 30 3a 70 74 72 |..' ptr%|!0=0:ptr|
|000028d0| 25 21 34 3d 2d 31 3a 70 | 74 72 25 21 38 3d 26 37 |%!4=-1:p|tr%!8=&7|
|000028e0| 30 30 30 30 32 31 0d 15 | d6 3a 20 24 28 70 74 72 |000021..|.: $(ptr|
|000028f0| 25 2b 31 32 29 3d c0 6d | 65 6e 75 24 2c a7 6d 65 |%+12)=.m|enu$,.me|
|00002900| 6e 75 24 2c 22 2c 22 29 | 2d 31 29 3a 70 74 72 25 |nu$,",")|-1):ptr%|
|00002910| 2b 3d 32 34 3a 65 6e 74 | 72 69 65 73 25 2b 3d 31 |+=24:ent|ries%+=1|
|00002920| 0d 15 e5 06 20 cd 0d 15 | f4 06 20 ce 0d 16 03 30 |.... ...|.. ....0|
|00002930| 20 70 74 72 25 21 2d 32 | 34 3d 70 74 72 25 21 2d | ptr%!-2|4=ptr%!-|
|00002940| 32 34 20 84 20 26 38 30 | 3a f4 20 4d 41 52 4b 20 |24 . &80|:. MARK |
|00002950| 41 53 20 4c 41 53 54 20 | 49 54 45 4d 0d 16 12 21 |AS LAST |ITEM...!|
|00002960| 20 e7 20 6f 6e 69 63 6f | 6e 62 61 72 25 20 6d 25 | . onico|nbar% m%|
|00002970| 21 33 32 3d 77 68 61 6e | 64 6c 65 32 25 0d 16 21 |!32=whan|dle2%..!|
|00002980| 36 20 e7 20 6f 6e 69 63 | 6f 6e 62 61 72 25 20 8c |6 . onic|onbar% .|
|00002990| 20 79 70 6f 73 25 3d 39 | 36 2b 65 6e 74 72 69 65 | ypos%=9|6+entrie|
|000029a0| 73 25 2a 34 34 20 8b 20 | 79 70 6f 73 25 3d 79 25 |s%*44 . |ypos%=y%|
|000029b0| 2b 32 30 0d 16 30 29 20 | c8 99 20 22 57 69 6d 70 |+20..0) |.. "Wimp|
|000029c0| 5f 43 72 65 61 74 65 4d | 65 6e 75 22 2c 2c 6d 25 |_CreateM|enu",,m%|
|000029d0| 2c 78 25 2d 36 34 2c 79 | 70 6f 73 25 0d 16 3f 06 |,x%-64,y|pos%..?.|
|000029e0| 20 e1 0d 16 4e 10 20 f4 | 2d 2d 2d 2d 2d 2d 2d 2d | ...N. .|--------|
|000029f0| 2d 2d 0d 16 5d 24 20 dd | f2 67 65 74 6f 72 69 67 |--..]$ .|.getorig|
|00002a00| 69 6e 28 62 6c 6f 63 6b | 25 2c f8 20 78 30 25 2c |in(block|%,. x0%,|
|00002a10| f8 20 79 30 25 29 0d 16 | 6c 33 20 78 30 25 3d 62 |. y0%)..|l3 x0%=b|
|00002a20| 6c 6f 63 6b 25 21 34 2d | 62 6c 6f 63 6b 25 21 32 |lock%!4-|block%!2|
|00002a30| 30 3a 79 30 25 3d 62 6c | 6f 63 6b 25 21 31 36 2d |0:y0%=bl|ock%!16-|
|00002a40| 62 6c 6f 63 6b 25 21 32 | 34 0d 16 7b 06 20 e1 0d |block%!2|4..{. ..|
|00002a50| 16 8a 10 20 f4 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |... .---|-------.|
|00002a60| 16 99 15 20 dd f2 69 73 | 65 74 28 78 25 2c 61 24 |... ..is|et(x%,a$|
|00002a70| 2c 57 48 29 0d 16 a8 3a | 20 62 6c 6f 63 6b 25 21 |,WH)...:| block%!|
|00002a80| 30 3d 57 48 3a 62 6c 6f | 63 6b 25 21 34 3d 78 25 |0=WH:blo|ck%!4=x%|
|00002a90| 3a c8 99 22 57 69 6d 70 | 5f 47 65 74 49 63 6f 6e |:.."Wimp|_GetIcon|
|00002aa0| 53 74 61 74 65 22 2c 2c | 62 6c 6f 63 6b 25 0d 16 |State",,|block%..|
|00002ab0| b7 14 20 24 28 62 6c 6f | 63 6b 25 21 32 38 29 3d |.. $(blo|ck%!28)=|
|00002ac0| 61 24 0d 16 c6 3a 20 62 | 6c 6f 63 6b 25 21 38 3d |a$...: b|lock%!8=|
|00002ad0| 30 3a 62 6c 6f 63 6b 25 | 21 31 32 3d 30 3a c8 99 |0:block%|!12=0:..|
|00002ae0| 20 22 57 69 6d 70 5f 53 | 65 74 49 63 6f 6e 53 74 | "Wimp_S|etIconSt|
|00002af0| 61 74 65 22 2c 2c 62 6c | 6f 63 6b 25 0d 16 d5 06 |ate",,bl|ock%....|
|00002b00| 20 e1 0d 16 e4 10 20 f4 | 2d 2d 2d 2d 2d 2d 2d 2d | ..... .|--------|
|00002b10| 2d 2d 0d 16 f3 13 20 dd | f2 69 72 65 61 64 28 78 |--.... .|.iread(x|
|00002b20| 25 2c 57 48 29 0d 17 02 | 3b 20 62 6c 6f 63 6b 25 |%,WH)...|; block%|
|00002b30| 21 30 3d 57 48 3a 62 6c | 6f 63 6b 25 21 34 3d 78 |!0=WH:bl|ock%!4=x|
|00002b40| 25 3a c8 99 20 22 57 69 | 6d 70 5f 47 65 74 49 63 |%:.. "Wi|mp_GetIc|
|00002b50| 6f 6e 53 74 61 74 65 22 | 2c 2c 62 6c 6f 63 6b 25 |onState"|,,block%|
|00002b60| 0d 17 11 14 20 61 24 3d | 24 28 62 6c 6f 63 6b 25 |.... a$=|$(block%|
|00002b70| 21 32 38 29 0d 17 20 06 | 20 e1 0d 17 2f 10 20 f4 |!28).. .| .../. .|
|00002b80| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 17 3e 13 20 dd |--------|--..>. .|
|00002b90| f2 6d 61 69 6e 6d 65 6e | 75 28 6d 25 29 0d 17 4d |.mainmen|u(m%)..M|
|00002ba0| 3f 20 6d 25 3f 31 32 3d | 37 3a 6d 25 3f 31 33 3d |? m%?12=|7:m%?13=|
|00002bb0| 32 3a 6d 25 3f 31 34 3d | 37 3a 6d 25 3f 31 35 3d |2:m%?14=|7:m%?15=|
|00002bc0| 30 3a 6d 25 21 31 36 3d | 32 33 34 3a 6d 25 21 32 |0:m%!16=|234:m%!2|
|00002bd0| 30 3d 34 34 3a 6d 25 21 | 32 34 3d 30 0d 17 5c 1d |0=44:m%!|24=0..\.|
|00002be0| 20 70 74 72 25 3d 6d 25 | 2b 32 38 3a 69 6e 64 69 | ptr%=m%|+28:indi|
|00002bf0| 72 25 3d 6d 25 2b 32 35 | 36 0d 17 6b 2b 20 f2 72 |r%=m%+25|6..k+ .r|
|00002c00| 6d 28 22 4d 55 41 31 22 | 29 3a 6d 6d 6c 3d a7 74 |m("MUA1"|):mml=.t|
|00002c10| 65 78 74 24 2c 22 2c 22 | 29 3a 65 6e 74 72 69 65 |ext$,","|):entrie|
|00002c20| 73 25 3d 30 0d 17 7a 31 | 20 24 6d 25 3d c0 74 65 |s%=0..z1| $m%=.te|
|00002c30| 78 74 24 2c 6d 6d 6c 2d | 31 29 3a 74 65 78 74 24 |xt$,mml-|1):text$|
|00002c40| 3d c2 74 65 78 74 24 2c | a9 28 74 65 78 74 24 29 |=.text$,|.(text$)|
|00002c50| 2d 6d 6d 6c 29 0d 17 89 | 06 20 f5 0d 17 98 15 20 |-mml)...|. ..... |
|00002c60| 20 6d 6d 6c 3d a7 74 65 | 78 74 24 2c 22 2c 22 29 | mml=.te|xt$,",")|
|00002c70| 0d 17 a7 19 20 20 6d 65 | 6e 75 24 3d c0 74 65 78 |....  me|nu$=.tex|
|00002c80| 74 24 2c 6d 6d 6c 2d 31 | 29 0d 17 b6 15 20 20 20 |t$,mml-1|)....   |
|00002c90| e7 20 6d 65 6e 75 24 3c | 3e 22 2a 22 20 8c 0d 17 |. menu$<|>"*" ...|
|00002ca0| c5 22 20 20 20 20 74 65 | 78 74 24 3d c2 74 65 78 |."    te|xt$=.tex|
|00002cb0| 74 24 2c a9 28 74 65 78 | 74 24 29 2d 6d 6d 6c 29 |t$,.(tex|t$)-mml)|
|00002cc0| 0d 17 d4 26 20 20 20 20 | 70 74 72 25 21 30 3d 30 |...&    |ptr%!0=0|
|00002cd0| 3a e7 20 65 6e 74 72 69 | 65 73 25 3d 30 20 70 74 |:. entri|es%=0 pt|
|00002ce0| 72 25 21 30 3d 32 0d 17 | e3 21 20 20 20 20 70 74 |r%!0=2..|.!    pt|
|00002cf0| 72 25 21 34 3d 2d 31 3a | 70 74 72 25 21 38 3d 26 |r%!4=-1:|ptr%!8=&|
|00002d00| 37 30 30 30 30 32 31 0d | 17 f2 3e 20 20 20 20 e7 |7000021.|..>    .|
|00002d10| 20 67 61 6d 65 5f 65 6e | 64 3d b9 3a e7 20 65 6e | game_en|d=.:. en|
|00002d20| 74 72 69 65 73 25 3e 30 | 20 80 20 65 6e 74 72 69 |tries%>0| . entri|
|00002d30| 65 73 25 3c 34 20 70 74 | 72 25 21 38 3d 26 32 30 |es%<4 pt|r%!8=&20|
|00002d40| 30 30 30 32 31 0d 18 01 | 16 20 20 20 20 e7 20 a9 |00021...|.    . .|
|00002d50| 6d 65 6e 75 24 3c 3d 31 | 32 20 8c 0d 18 10 2e 20 |menu$<=1|2 ..... |
|00002d60| 20 20 20 20 24 28 70 74 | 72 25 2b 31 32 29 3d 6d |    $(pt|r%+12)=m|
|00002d70| 65 6e 75 24 3a 70 74 72 | 25 2b 3d 32 34 3a 65 6e |enu$:ptr|%+=24:en|
|00002d80| 74 72 69 65 73 25 2b 3d | 31 0d 18 1f 09 20 20 20 |tries%+=|1....   |
|00002d90| 20 cc 0d 18 2e 40 20 20 | 20 20 20 70 74 72 25 21 | ....@  |   ptr%!|
|00002da0| 31 32 3d 69 6e 64 69 72 | 25 3a 70 74 72 25 21 31 |12=indir|%:ptr%!1|
|00002db0| 36 3d 30 3a 70 74 72 25 | 21 32 30 3d a9 6d 65 6e |6=0:ptr%|!20=.men|
|00002dc0| 75 24 2b 31 3a 24 69 6e | 64 69 72 25 3d 6d 65 6e |u$+1:$in|dir%=men|
|00002dd0| 75 24 0d 18 3d 47 20 20 | 20 20 20 70 74 72 25 21 |u$..=G  |   ptr%!|
|00002de0| 38 3d 28 70 74 72 25 21 | 38 20 84 20 26 31 30 30 |8=(ptr%!|8 . &100|
|00002df0| 29 3a 70 74 72 25 2b 3d | 32 34 3a 65 6e 74 72 69 |):ptr%+=|24:entri|
|00002e00| 65 73 25 2b 3d 31 3a 69 | 6e 64 69 72 25 2b 3d 28 |es%+=1:i|ndir%+=(|
|00002e10| a9 6d 65 6e 75 24 2b 31 | 29 0d 18 4c 09 20 20 20 |.menu$+1|)..L.   |
|00002e20| 20 cd 0d 18 5b 35 20 20 | 20 20 e7 20 36 34 2b 28 | ...[5  |  . 64+(|
|00002e30| a9 6d 65 6e 75 24 2a 31 | 34 29 20 3e 20 6d 25 21 |.menu$*1|4) > m%!|
|00002e40| 31 36 20 6d 25 21 31 36 | 3d 36 34 2b 28 a9 6d 65 |16 m%!16|=64+(.me|
|00002e50| 6e 75 24 2a 31 34 29 0d | 18 6a 58 20 20 cd 3a e7 |nu$*14).|.jX  .:.|
|00002e60| 20 70 74 72 25 3e 6d 25 | 2b 32 35 36 20 85 20 31 | ptr%>m%|+256 . 1|
|00002e70| 2c 22 4e 4f 20 52 4f 4f | 4d 20 46 4f 52 20 4d 45 |,"NO ROO|M FOR ME|
|00002e80| 4e 55 53 22 20 8b 20 e7 | 20 69 6e 64 69 72 25 3e |NUS" . .| indir%>|
|00002e90| 6d 25 2b 34 35 30 20 85 | 20 32 2c 22 4d 45 4e 55 |m%+450 .| 2,"MENU|
|00002ea0| 20 49 54 45 4d 53 20 54 | 4f 4f 20 42 49 47 22 0d | ITEMS T|OO BIG".|
|00002eb0| 18 79 10 20 fd 20 6d 65 | 6e 75 24 3d 22 2a 22 0d |.y. . me|nu$="*".|
|00002ec0| 18 88 1c 20 70 74 72 25 | 21 2d 32 34 3d 70 74 72 |... ptr%|!-24=ptr|
|00002ed0| 25 21 2d 32 34 20 84 20 | 26 38 30 0d 18 97 06 20 |%!-24 . |&80.... |
|00002ee0| e1 0d 18 a6 10 20 f4 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..... .-|--------|
|00002ef0| 2d 0d 18 b5 0e 20 dd f2 | 70 61 6c 69 6e 69 74 0d |-.... ..|palinit.|
|00002f00| 18 c4 1c 20 70 30 25 21 | 30 3d 26 66 66 66 66 66 |... p0%!|0=&fffff|
|00002f10| 66 30 30 3a 70 30 25 21 | 34 3d 30 0d 18 d3 3d 20 |f00:p0%!|4=0...= |
|00002f20| 70 31 25 21 30 3d 26 66 | 66 66 66 66 66 30 30 3a |p1%!0=&f|fffff00:|
|00002f30| 70 31 25 21 34 3d 26 62 | 62 62 62 62 62 30 30 3a |p1%!4=&b|bbbbb00:|
|00002f40| 70 31 25 21 38 3d 26 37 | 37 37 37 37 37 30 30 3a |p1%!8=&7|7777700:|
|00002f50| 70 31 25 21 31 32 3d 30 | 0d 18 e2 45 20 70 32 25 |p1%!12=0|...E p2%|
|00002f60| 21 30 3d 26 66 66 66 66 | 66 66 30 30 3a 70 32 25 |!0=&ffff|ff00:p2%|
|00002f70| 21 34 3d 26 64 64 64 64 | 64 64 30 30 3a 70 32 25 |!4=&dddd|dd00:p2%|
|00002f80| 21 38 3d 26 62 62 62 62 | 62 62 30 30 3a 70 32 25 |!8=&bbbb|bb00:p2%|
|00002f90| 21 31 32 3d 26 39 39 39 | 39 39 39 30 30 0d 18 f1 |!12=&999|99900...|
|00002fa0| 40 20 70 32 25 21 31 36 | 3d 26 37 37 37 37 37 37 |@ p2%!16|=&777777|
|00002fb0| 30 30 3a 70 32 25 21 32 | 30 3d 26 35 35 35 35 35 |00:p2%!2|0=&55555|
|00002fc0| 35 30 30 3a 70 32 25 21 | 32 34 3d 26 33 33 33 33 |500:p2%!|24=&3333|
|00002fd0| 33 33 30 30 3a 70 32 25 | 21 32 38 3d 30 0d 19 00 |3300:p2%|!28=0...|
|00002fe0| 48 20 70 32 25 21 33 32 | 3d 26 39 39 34 34 30 30 |H p2%!32|=&994400|
|00002ff0| 30 30 3a 70 32 25 21 33 | 36 3d 26 30 30 65 65 65 |00:p2%!3|6=&00eee|
|00003000| 65 30 30 3a 70 32 25 21 | 34 30 3d 26 30 30 63 63 |e00:p2%!|40=&00cc|
|00003010| 30 30 30 30 3a 70 32 25 | 21 34 34 3d 26 30 30 30 |0000:p2%|!44=&000|
|00003020| 30 64 64 30 30 0d 19 0f | 48 20 70 32 25 21 34 38 |0dd00...|H p2%!48|
|00003030| 3d 26 62 62 65 65 65 65 | 30 30 3a 70 32 25 21 35 |=&bbeeee|00:p2%!5|
|00003040| 32 3d 26 30 30 38 38 35 | 35 30 30 3a 70 32 25 21 |2=&00885|500:p2%!|
|00003050| 35 36 3d 26 30 30 62 62 | 66 66 30 30 3a 70 32 25 |56=&00bb|ff00:p2%|
|00003060| 21 36 30 3d 26 66 66 62 | 62 30 30 30 30 0d 19 1e |!60=&ffb|b0000...|
|00003070| 45 20 70 33 25 21 30 3d | 26 30 30 30 30 30 30 30 |E p3%!0=|&0000000|
|00003080| 30 3a 70 33 25 21 34 3d | 26 31 30 31 30 31 30 30 |0:p3%!4=|&1010100|
|00003090| 30 3a 70 33 25 21 38 3d | 26 32 30 32 30 32 30 30 |0:p3%!8=|&2020200|
|000030a0| 30 3a 70 33 25 21 31 32 | 3d 26 33 30 33 30 33 30 |0:p3%!12|=&303030|
|000030b0| 30 30 0d 19 2d 48 20 70 | 33 25 21 31 36 3d 26 30 |00..-H p|3%!16=&0|
|000030c0| 30 30 30 34 30 30 30 3a | 70 33 25 21 32 30 3d 26 |0004000:|p3%!20=&|
|000030d0| 31 30 31 30 35 30 30 30 | 3a 70 33 25 21 32 34 3d |10105000|:p3%!24=|
|000030e0| 26 32 30 32 30 36 30 30 | 30 3a 70 33 25 21 32 38 |&2020600|0:p3%!28|
|000030f0| 3d 26 33 30 33 30 37 30 | 30 30 0d 19 3c 48 20 70 |=&303070|00..<H p|
|00003100| 33 25 21 33 32 3d 26 34 | 30 30 30 30 30 30 30 3a |3%!32=&4|0000000:|
|00003110| 70 33 25 21 33 36 3d 26 | 35 30 31 30 31 30 30 30 |p3%!36=&|50101000|
|00003120| 3a 70 33 25 21 34 30 3d | 26 36 30 32 30 32 30 30 |:p3%!40=|&6020200|
|00003130| 30 3a 70 33 25 21 34 34 | 3d 26 37 30 33 30 33 30 |0:p3%!44|=&703030|
|00003140| 30 30 0d 19 4b 48 20 70 | 33 25 21 34 38 3d 26 34 |00..KH p|3%!48=&4|
|00003150| 30 30 30 34 30 30 30 3a | 70 33 25 21 35 32 3d 26 |0004000:|p3%!52=&|
|00003160| 35 30 31 30 35 30 30 30 | 3a 70 33 25 21 35 36 3d |50105000|:p3%!56=|
|00003170| 26 36 30 32 30 36 30 30 | 30 3a 70 33 25 21 36 30 |&6020600|0:p3%!60|
|00003180| 3d 26 37 30 33 30 37 30 | 30 30 0d 19 5a 06 20 e1 |=&703070|00..Z. .|
|00003190| 0d 19 69 11 20 f4 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..i. .--|--------|
|000031a0| 2d 0d 19 78 0c 20 dd f2 | 73 65 74 75 70 0d 19 87 |-..x. ..|setup...|
|000031b0| 20 20 de 20 61 72 65 61 | 25 20 32 35 36 2c 74 6d |  . area|% 256,tm|
|000031c0| 61 74 20 32 34 2c 62 62 | 6f 78 20 31 36 0d 19 96 |at 24,bb|ox 16...|
|000031d0| 3e 20 c8 99 22 4f 53 5f | 52 65 61 64 56 61 72 56 |> .."OS_|ReadVarV|
|000031e0| 61 6c 22 2c 22 21 44 6f | 5f 57 6f 72 64 24 44 69 |al","!Do|_Word$Di|
|000031f0| 72 22 2c 61 72 65 61 25 | 2c 32 35 36 2c 30 2c 33 |r",area%|,256,0,3|
|00003200| 20 b8 20 2c 2c 6c 65 6e | 67 74 68 0d 19 a5 21 20 | . ,,len|gth...! |
|00003210| 61 72 65 61 25 3f 6c 65 | 6e 67 74 68 3d 31 33 3a |area%?le|ngth=13:|
|00003220| 70 61 74 68 24 3d 24 61 | 72 65 61 25 0d 19 b4 39 |path$=$a|rea%...9|
|00003230| 20 59 24 3d 70 61 74 68 | 24 2b 22 2e 54 65 6d 70 | Y$=path|$+".Temp|
|00003240| 6c 61 74 65 73 22 3a 59 | 31 24 3d 70 61 74 68 24 |lates":Y|1$=path$|
|00003250| 2b 22 2e 69 63 6f 6e 73 | 22 3a 73 68 6f 77 5f 64 |+".icons|":show_d|
|00003260| 69 72 3d 2d 31 0d 19 c3 | 41 20 de 20 70 30 25 20 |ir=-1...|A . p0% |
|00003270| 38 2c 70 31 25 20 31 36 | 2c 70 32 25 20 36 34 2c |8,p1% 16|,p2% 64,|
|00003280| 70 33 25 20 36 34 3a 73 | 6d 6f 64 65 25 3d 2d 31 |p3% 64:s|mode%=-1|
|00003290| 3a 4d 58 3d 2d 31 3a 4d | 59 3d 2d 31 3a 67 72 69 |:MX=-1:M|Y=-1:gri|
|000032a0| 64 5f 73 7a 3d 30 0d 19 | d2 2d 20 de 20 70 61 6c |d_sz=0..|.- . pal|
|000032b0| 62 75 66 66 25 20 32 30 | 34 38 2c 74 72 61 6e 73 |buff% 20|48,trans|
|000032c0| 32 25 20 32 30 34 38 2c | 42 75 66 66 65 72 25 20 |2% 2048,|Buffer% |
|000032d0| 31 32 38 0d 19 e1 2e 20 | de 20 74 72 61 6e 73 25 |128.... |. trans%|
|000032e0| 20 31 36 2c 72 65 63 74 | 25 20 31 36 2c 70 6c 6f | 16,rect|% 16,plo|
|000032f0| 74 61 74 25 20 38 2c 72 | 65 63 74 69 6e 25 20 31 |tat% 8,r|ectin% 1|
|00003300| 36 0d 19 f0 4c 20 de 20 | 62 6c 6f 63 6b 25 20 31 |6...L . |block% 1|
|00003310| 30 30 30 30 2c 6d 6d 65 | 6e 75 25 20 35 30 30 2c |0000,mme|nu% 500,|
|00003320| 62 6c 6f 63 6b 32 25 20 | 32 35 36 2c 63 65 72 74 |block2% |256,cert|
|00003330| 73 70 61 63 65 31 20 31 | 31 30 30 30 2c 63 65 72 |space1 1|1000,cer|
|00003340| 74 73 70 61 63 65 32 20 | 31 31 30 30 30 0d 19 ff |tspace2 |11000...|
|00003350| 3e 20 de 20 62 6c 6f 63 | 6b 32 25 20 32 35 36 2c |> . bloc|k2% 256,|
|00003360| 62 6c 6f 63 6b 33 25 20 | 31 32 38 2c 6d 65 6e 75 |block3% |128,menu|
|00003370| 25 20 35 30 30 2c 6d 61 | 67 25 20 31 36 2c 64 69 |% 500,ma|g% 16,di|
|00003380| 72 73 65 61 72 63 68 20 | 39 32 34 0d 1a 0e 27 20 |rsearch |924...' |
|00003390| de 20 53 51 24 28 32 30 | 2c 32 30 29 2c 57 44 24 |. SQ$(20|,20),WD$|
|000033a0| 28 32 2c 32 34 29 2c 53 | 51 31 24 28 32 30 2c 32 |(2,24),S|Q1$(20,2|
|000033b0| 30 29 0d 1a 1d 2f 20 de | 20 57 44 5f 52 28 32 34 |0).../ .| WD_R(24|
|000033c0| 29 2c 57 44 5f 43 28 32 | 34 29 2c 57 44 5f 44 49 |),WD_C(2|4),WD_DI|
|000033d0| 52 28 32 34 29 2c 57 44 | 5f 4e 28 32 30 2c 32 30 |R(24),WD|_N(20,20|
|000033e0| 29 0d 1a 2c 38 20 52 4f | 57 53 25 3d 32 30 3a 43 |)..,8 RO|WS%=20:C|
|000033f0| 4f 4c 53 25 3d 32 30 3a | 64 6f 5f 61 6e 73 77 65 |OLS%=20:|do_answe|
|00003400| 72 3d 30 3a 67 61 6d 65 | 5f 65 6e 64 3d b9 3a 72 |r=0:game|_end=.:r|
|00003410| 65 76 65 61 6c 65 64 3d | a3 0d 1a 3b 2b 20 74 69 |evealed=|...;+ ti|
|00003420| 74 6c 65 5f 66 6f 6e 74 | 3d 31 3a 74 65 78 74 5f |tle_font|=1:text_|
|00003430| 66 6f 6e 74 3d 31 3a 66 | 69 6c 65 5f 6c 6f 61 64 |font=1:f|ile_load|
|00003440| 65 64 3d a3 0d 1a 4a 1f | 20 67 72 69 64 5f 66 6f |ed=...J.| grid_fo|
|00003450| 6e 74 3d 31 3a 67 72 69 | 64 5f 66 6f 6e 74 63 6f |nt=1:gri|d_fontco|
|00003460| 6c 3d 37 0d 1a 59 34 20 | 74 69 74 6c 65 5f 66 6f |l=7..Y4 |title_fo|
|00003470| 6e 74 63 6f 6c 3d 37 3a | 74 65 78 74 5f 66 6f 6e |ntcol=7:|text_fon|
|00003480| 74 63 6f 6c 3d 37 3a 6f | 6c 64 5f 73 74 79 6c 65 |tcol=7:o|ld_style|
|00003490| 5f 6d 6f 64 65 3d eb 0d | 1a 68 23 20 70 69 63 74 |_mode=..|.h# pict|
|000034a0| 75 72 65 25 3d a3 3a 64 | 72 61 77 32 25 3d a3 3a |ure%=.:d|raw2%=.:|
|000034b0| 67 72 61 70 68 69 63 25 | 3d 31 0d 1a 77 21 20 74 |graphic%|=1..w! t|
|000034c0| 6f 70 5f 62 6f 72 64 65 | 72 3d b9 3a 62 6f 74 74 |op_borde|r=.:bott|
|000034d0| 6f 6d 5f 62 6f 72 64 65 | 72 3d b9 0d 1a 86 2b 20 |om_borde|r=....+ |
|000034e0| 61 64 6a 75 73 74 3d 30 | 3a 67 72 61 62 62 65 64 |adjust=0|:grabbed|
|000034f0| 3d a3 3a 63 72 65 61 74 | 65 5f 6d 65 6e 75 3d 30 |=.:creat|e_menu=0|
|00003500| 3a 74 61 67 3d 30 0d 1a | 95 3c 20 67 72 69 64 5f |:tag=0..|.< grid_|
|00003510| 70 6f 73 6e 3d 31 3a 73 | 61 76 65 5f 63 6c 6f 73 |posn=1:s|ave_clos|
|00003520| 65 3d a3 3a 77 6f 72 64 | 5f 6c 69 6d 3d 30 3a 54 |e=.:word|_lim=0:T|
|00003530| 69 74 6c 65 24 3d 22 43 | 72 6f 73 73 20 57 6f 72 |itle$="C|ross Wor|
|00003540| 64 22 0d 1a a4 22 20 73 | 71 75 5f 74 61 67 3d 30 |d"..." s|qu_tag=0|
|00003550| 3a 4d 55 24 3d 22 22 3a | 73 63 72 61 70 5f 72 65 |:MU$="":|scrap_re|
|00003560| 66 25 3d 30 0d 1a b3 21 | 20 62 6f 72 64 65 72 5f |f%=0...!| border_|
|00003570| 73 74 79 6c 65 3d 31 3a | 70 72 69 6e 74 5f 70 61 |style=1:|print_pa|
|00003580| 75 73 65 3d b9 0d 1a c2 | 32 20 6d 64 61 74 61 62 |use=....|2 mdatab|
|00003590| 6c 6f 63 6b 25 3d 93 3a | 6d 64 61 74 61 62 6c 6f |lock%=.:|mdatablo|
|000035a0| 63 6b 5f 65 6e 64 25 3d | 93 3a 67 72 61 62 62 65 |ck_end%=|.:grabbe|
|000035b0| 64 5f 6f 6e 65 3d a3 0d | 1a d1 18 20 78 67 72 61 |d_one=..|... xgra|
|000035c0| 62 3d 38 30 30 3a 79 67 | 72 61 62 3d 34 30 30 0d |b=800:yg|rab=400.|
|000035d0| 1a e0 23 20 63 68 61 6e | 67 65 64 5f 62 6f 72 64 |..# chan|ged_bord|
|000035e0| 65 72 3d a3 3a 67 72 69 | 64 5f 72 65 64 72 61 77 |er=.:gri|d_redraw|
|000035f0| 3d a3 0d 1a ef 06 20 e1 | 0d 1a fe 10 20 f4 2d 2d |=..... .|.... .--|
|00003600| 2d 2d 2d 2d 2d 2d 2d 2d | 0d 1b 0d 0d 20 dd f2 73 |--------|.... ..s|
|00003610| 65 74 75 70 32 0d 1b 1c | 3d 20 de 20 64 73 6b 25 |etup2...|= . dsk%|
|00003620| 20 31 32 30 2c 64 69 73 | 25 20 36 31 33 2c 6e 61 | 120,dis|% 613,na|
|00003630| 6d 65 25 20 32 35 35 2c | 77 69 6e 5f 69 64 65 6e |me% 255,|win_iden|
|00003640| 25 20 31 31 2c 69 6e 25 | 20 31 36 2c 6f 75 25 20 |% 11,in%| 16,ou% |
|00003650| 31 36 0d 1b 2b 2e 20 de | 20 73 70 72 6e 61 6d 65 |16..+. .| sprname|
|00003660| 25 20 31 33 2c 69 63 6f | 6e 73 70 61 63 65 20 31 |% 13,ico|nspace 1|
|00003670| 35 2a 31 30 32 34 2c 46 | 52 45 44 25 20 32 35 36 |5*1024,F|RED% 256|
|00003680| 0d 1b 3a 2a 20 de 20 77 | 64 61 74 61 31 25 20 31 |..:* . w|data1% 1|
|00003690| 35 30 30 30 3a 77 64 31 | 65 6e 64 25 3d 77 64 61 |5000:wd1|end%=wda|
|000036a0| 74 61 31 25 2b 31 35 30 | 30 30 0d 1b 49 10 20 f2 |ta1%+150|00..I. .|
|000036b0| 66 69 6e 64 5f 64 69 6d | 65 6e 0d 1b 58 52 20 c8 |find_dim|en..XR .|
|000036c0| 99 22 4f 53 5f 53 70 72 | 69 74 65 4f 70 22 2c 32 |."OS_Spr|iteOp",2|
|000036d0| 36 35 2c 69 63 6f 6e 73 | 70 61 63 65 3a 21 69 63 |65,icons|pace:!ic|
|000036e0| 6f 6e 73 70 61 63 65 3d | 31 35 2a 31 30 32 34 3a |onspace=|15*1024:|
|000036f0| 69 63 6f 6e 73 70 61 63 | 65 21 34 3d 30 3a 69 63 |iconspac|e!4=0:ic|
|00003700| 6f 6e 73 70 61 63 65 21 | 38 3d 31 36 0d 1b 67 13 |onspace!|8=16..g.|
|00003710| 20 24 62 6c 6f 63 6b 25 | 3d 22 54 41 53 4b 22 0d | $block%|="TASK".|
|00003720| 1b 76 3f 20 c8 99 22 57 | 69 6d 70 5f 49 6e 69 74 |.v? .."W|imp_Init|
|00003730| 69 61 6c 69 73 65 22 2c | 32 30 30 2c 21 62 6c 6f |ialise",|200,!blo|
|00003740| 63 6b 25 2c 22 44 6f 5f | 57 6f 72 64 22 20 b8 20 |ck%,"Do_|Word" . |
|00003750| 76 65 72 73 69 6f 6e 25 | 2c 74 61 73 6b 25 0d 1b |version%|,task%..|
|00003760| 85 0c 20 71 75 69 74 25 | 3d a3 0d 1b 94 04 0d 1b |.. quit%|=.......|
|00003770| a3 37 20 44 4e 24 3d 70 | 61 74 68 24 2b 22 2e 43 |.7 DN$=p|ath$+".C|
|00003780| 65 72 74 5f 42 6f 72 64 | 22 3a c8 99 22 4f 53 5f |ert_Bord|":.."OS_|
|00003790| 46 69 6c 65 22 2c 31 37 | 2c 44 4e 24 20 b8 20 2c |File",17|,DN$ . ,|
|000037a0| 2c 2c 2c 6c 25 0d 1b b2 | 24 20 ff 28 22 4c 4f 41 |,,,l%...|$ .("LOA|
|000037b0| 44 20 22 2b 44 4e 24 2b | 22 20 22 2b c3 7e 63 65 |D "+DN$+|" "+.~ce|
|000037c0| 72 74 73 70 61 63 65 31 | 29 0d 1b c1 34 20 66 69 |rtspace1|)...4 fi|
|000037d0| 6c 65 31 25 3d 63 65 72 | 74 73 70 61 63 65 31 3a |le1%=cer|tspace1:|
|000037e0| 62 25 3d 63 65 72 74 73 | 70 61 63 65 31 2b 38 3a |b%=certs|pace1+8:|
|000037f0| 66 69 6c 65 31 5f 6c 65 | 6e 25 3d 6c 25 0d 1b d0 |file1_le|n%=l%...|
|00003800| 33 20 e7 20 62 25 21 31 | 36 3d 30 20 80 20 62 25 |3 . b%!1|6=0 . b%|
|00003810| 21 32 30 3d 30 20 80 20 | 62 25 21 32 34 3d 30 20 |!20=0 . |b%!24=0 |
|00003820| 80 20 62 25 21 32 38 3d | 30 20 62 25 2b 3d 35 36 |. b%!28=|0 b%+=56|
|00003830| 0d 1b df 48 20 42 58 31 | 25 3d 28 62 25 21 31 36 |...H BX1|%=(b%!16|
|00003840| 29 2f 32 35 36 3a 42 59 | 31 25 3d 28 62 25 21 32 |)/256:BY|1%=(b%!2|
|00003850| 30 29 2f 32 35 36 3a 54 | 58 31 25 3d 28 62 25 21 |0)/256:T|X1%=(b%!|
|00003860| 32 34 29 2f 32 35 36 3a | 54 59 31 25 3d 28 62 25 |24)/256:|TY1%=(b%|
|00003870| 21 32 38 29 2f 32 35 36 | 0d 1b ee 36 20 44 4e 24 |!28)/256|...6 DN$|
|00003880| 3d 70 61 74 68 24 2b 22 | 2e 43 65 72 74 5f 45 66 |=path$+"|.Cert_Ef|
|00003890| 66 22 3a c8 99 22 4f 53 | 5f 46 69 6c 65 22 2c 31 |f":.."OS|_File",1|
|000038a0| 37 2c 44 4e 24 20 b8 20 | 2c 2c 2c 2c 6c 25 0d 1b |7,DN$ . |,,,,l%..|
|000038b0| fd 24 20 ff 28 22 4c 4f | 41 44 20 22 2b 44 4e 24 |.$ .("LO|AD "+DN$|
|000038c0| 2b 22 20 22 2b c3 7e 63 | 65 72 74 73 70 61 63 65 |+" "+.~c|ertspace|
|000038d0| 32 29 0d 1c 0c 34 20 66 | 69 6c 65 32 25 3d 63 65 |2)...4 f|ile2%=ce|
|000038e0| 72 74 73 70 61 63 65 32 | 3a 62 25 3d 63 65 72 74 |rtspace2|:b%=cert|
|000038f0| 73 70 61 63 65 32 2b 38 | 3a 66 69 6c 65 32 5f 6c |space2+8|:file2_l|
|00003900| 65 6e 25 3d 6c 25 0d 1c | 1b 33 20 e7 20 62 25 21 |en%=l%..|.3 . b%!|
|00003910| 31 36 3d 30 20 80 20 62 | 25 21 32 30 3d 30 20 80 |16=0 . b|%!20=0 .|
|00003920| 20 62 25 21 32 34 3d 30 | 20 80 20 62 25 21 32 38 | b%!24=0| . b%!28|
|00003930| 3d 30 20 62 25 2b 3d 35 | 36 0d 1c 2a 48 20 42 58 |=0 b%+=5|6..*H BX|
|00003940| 32 25 3d 28 62 25 21 31 | 36 29 2f 32 35 36 3a 42 |2%=(b%!1|6)/256:B|
|00003950| 59 32 25 3d 28 62 25 21 | 32 30 29 2f 32 35 36 3a |Y2%=(b%!|20)/256:|
|00003960| 54 58 32 25 3d 28 62 25 | 21 32 34 29 2f 32 35 36 |TX2%=(b%|!24)/256|
|00003970| 3a 54 59 32 25 3d 28 62 | 25 21 32 38 29 2f 32 35 |:TY2%=(b|%!28)/25|
|00003980| 36 0d 1c 39 04 0d 1c 48 | 1e 20 c8 99 22 57 69 6d |6..9...H|. .."Wim|
|00003990| 70 5f 4f 70 65 6e 54 65 | 6d 70 6c 61 74 65 22 2c |p_OpenTe|mplate",|
|000039a0| 2c 59 24 0d 1c 57 34 20 | 77 68 61 6e 64 6c 65 31 |,Y$..W4 |whandle1|
|000039b0| 25 3d a4 54 65 6d 70 28 | 22 4d 61 69 6e 22 29 3a |%=.Temp(|"Main"):|
|000039c0| 77 68 61 6e 64 6c 65 32 | 25 3d a4 54 65 6d 70 28 |whandle2|%=.Temp(|
|000039d0| 22 49 6e 66 6f 22 29 0d | 1c 66 37 20 77 68 61 6e |"Info").|.f7 whan|
|000039e0| 64 6c 65 39 25 3d a4 54 | 65 6d 70 28 22 77 61 72 |dle9%=.T|emp("war|
|000039f0| 6e 69 6e 67 22 29 3a 70 | 72 6f 6d 70 74 25 3d a4 |ning"):p|rompt%=.|
|00003a00| 54 65 6d 70 28 22 70 72 | 6f 6d 70 74 22 29 0d 1c |Temp("pr|ompt")..|
|00003a10| 75 38 20 77 68 61 6e 64 | 6c 65 31 35 25 3d a4 54 |u8 whand|le15%=.T|
|00003a20| 65 6d 70 28 22 63 6c 6f | 73 65 64 6f 77 6e 22 29 |emp("clo|sedown")|
|00003a30| 3a 66 69 6e 5f 77 69 6e | 25 3d a4 54 65 6d 70 28 |:fin_win|%=.Temp(|
|00003a40| 22 66 69 6e 22 29 0d 1c | 84 34 20 61 63 72 6f 73 |"fin")..|.4 acros|
|00003a50| 73 25 3d a4 54 65 6d 70 | 28 22 61 63 72 6f 73 73 |s%=.Temp|("across|
|00003a60| 22 29 3a 65 72 72 62 6f | 78 25 3d a4 54 65 6d 70 |"):errbo|x%=.Temp|
|00003a70| 28 22 65 72 72 62 6f 78 | 22 29 0d 1c 86 16 20 72 |("errbox|").... r|
|00003a80| 65 67 25 3d a4 54 65 6d | 70 28 22 72 65 67 22 29 |eg%=.Tem|p("reg")|
|00003a90| 0d 1c 93 35 20 70 72 69 | 6e 74 5f 77 69 6e 25 3d |...5 pri|nt_win%=|
|00003aa0| a4 54 65 6d 70 28 22 70 | 72 69 6e 74 22 29 3a c8 |.Temp("p|rint"):.|
|00003ab0| 99 22 57 69 6d 70 5f 43 | 6c 6f 73 65 54 65 6d 70 |."Wimp_C|loseTemp|
|00003ac0| 6c 61 74 65 22 0d 1c a2 | 26 20 c8 99 22 4f 53 5f |late"...|& .."OS_|
|00003ad0| 53 70 72 69 74 65 4f 70 | 22 2c 32 36 36 2c 69 63 |SpriteOp|",266,ic|
|00003ae0| 6f 6e 73 70 61 63 65 2c | 59 31 24 0d 1c b1 0d 20 |onspace,|Y1$.... |
|00003af0| f2 70 61 6c 69 6e 69 74 | 0d 1c c0 39 20 69 62 61 |.palinit|...9 iba|
|00003b00| 72 31 25 3d a4 69 63 6f | 6e 64 65 66 28 2d 31 2c |r1%=.ico|ndef(-1,|
|00003b10| 30 2c 30 2c 36 38 2c 36 | 38 2c 26 33 30 30 32 2c |0,0,68,6|8,&3002,|
|00003b20| 22 21 44 6f 5f 57 6f 72 | 64 22 2c 30 2c 30 2c 30 |"!Do_Wor|d",0,0,0|
|00003b30| 29 0d 1c cf 04 0d 1c de | 3e 20 c8 99 22 4f 53 5f |).......|> .."OS_|
|00003b40| 52 65 61 64 56 61 72 56 | 61 6c 22 2c 22 44 6f 5f |ReadVarV|al","Do_|
|00003b50| 57 6f 72 64 5f 54 61 69 | 6c 22 2c 46 52 45 44 25 |Word_Tai|l",FRED%|
|00003b60| 2c 32 35 36 2c 30 2c 33 | 20 b8 20 2c 2c 6c 65 6e |,256,0,3| . ,,len|
|00003b70| 67 74 68 0d 1c ed 38 20 | 46 52 45 44 25 3f 6c 65 |gth...8 |FRED%?le|
|00003b80| 6e 67 74 68 3d 31 33 3a | 63 6f 6d 64 24 3d 24 46 |ngth=13:|comd$=$F|
|00003b90| 52 45 44 25 3a 62 65 72 | 74 25 3d ad 28 63 6f 6d |RED%:ber|t%=.(com|
|00003ba0| 64 24 2b 22 2e 21 52 75 | 6e 22 29 0d 1c fc 21 20 |d$+".!Ru|n")...! |
|00003bb0| e7 20 62 65 72 74 25 3d | 30 20 63 6f 6d 64 24 3d |. bert%=|0 comd$=|
|00003bc0| 22 22 20 8b 20 d9 23 62 | 65 72 74 25 0d 1d 0b 06 |"" . .#b|ert%....|
|00003bd0| 20 e1 0d 1d 1a 10 20 f4 | 2d 2d 2d 2d 2d 2d 2d 2d | ..... .|--------|
|00003be0| 2d 2d 0d 1d 29 0d 20 dd | f2 73 65 74 75 70 33 0d |--..). .|.setup3.|
|00003bf0| 1d 38 2e 20 59 37 24 3d | 70 61 74 68 24 2b 22 2e |.8. Y7$=|path$+".|
|00003c00| 4d 65 73 73 61 67 65 73 | 22 3a de 20 6d 65 73 73 |Messages|":. mess|
|00003c10| 61 67 65 5f 61 72 65 61 | 20 32 33 30 30 0d 1d 47 |age_area| 2300..G|
|00003c20| 28 20 de 20 6d 65 73 73 | 61 67 65 5f 70 74 72 20 |( . mess|age_ptr |
|00003c30| 31 35 2c 73 71 75 25 20 | 31 36 2c 4d 62 75 66 66 |15,squ% |16,Mbuff|
|00003c40| 25 20 32 35 36 0d 1d 56 | 3b 20 c8 99 22 4d 65 73 |% 256..V|; .."Mes|
|00003c50| 73 61 67 65 54 72 61 6e | 73 5f 4f 70 65 6e 46 69 |sageTran|s_OpenFi|
|00003c60| 6c 65 22 2c 6d 65 73 73 | 61 67 65 5f 70 74 72 2c |le",mess|age_ptr,|
|00003c70| 59 37 24 2c 6d 65 73 73 | 61 67 65 5f 61 72 65 61 |Y7$,mess|age_area|
|00003c80| 0d 1d 65 29 20 f2 72 6d | 28 22 76 65 72 6e 22 29 |..e) .rm|("vern")|
|00003c90| 3a f2 69 73 65 74 28 37 | 2c 74 65 78 74 24 2c 77 |:.iset(7|,text$,w|
|00003ca0| 68 61 6e 64 6c 65 32 25 | 29 0d 1d 74 06 20 e1 0d |handle2%|)..t. ..|
|00003cb0| 1d 83 10 20 f4 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |... .---|-------.|
|00003cc0| 1d 92 0e 20 dd f2 72 6d | 28 72 6d 24 29 0d 1d a1 |... ..rm|(rm$)...|
|00003cd0| 40 20 c8 99 22 4d 65 73 | 73 61 67 65 54 72 61 6e |@ .."Mes|sageTran|
|00003ce0| 73 5f 4c 6f 6f 6b 75 70 | 22 2c 6d 65 73 73 61 67 |s_Lookup|",messag|
|00003cf0| 65 5f 70 74 72 2c 72 6d | 24 2c 30 20 b8 20 2c 2c |e_ptr,rm|$,0 . ,,|
|00003d00| 6d 5f 70 74 72 25 2c 6d | 5f 6c 65 6e 25 0d 1d b0 |m_ptr%,m|_len%...|
|00003d10| 3d 20 74 65 78 74 24 3d | 22 22 3a e3 20 6c 6f 6f |= text$=|"":. loo|
|00003d20| 70 31 34 3d 30 20 b8 20 | 6d 5f 6c 65 6e 25 2d 31 |p14=0 . |m_len%-1|
|00003d30| 3a 74 65 78 74 24 2b 3d | bd 28 6d 5f 70 74 72 25 |:text$+=|.(m_ptr%|
|00003d40| 3f 6c 6f 6f 70 31 34 29 | 3a ed 0d 1d bf 06 20 e1 |?loop14)|:..... .|
|00003d50| 0d 1d ce 10 20 f4 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.... .--|--------|
|00003d60| 0d 1d dd 0d 20 dd a4 6d | 73 28 41 24 29 0d 1d ec |.... ..m|s(A$)...|
|00003d70| 09 20 ea 20 4c 25 0d 1d | fb 44 20 c8 99 20 22 4d |. . L%..|.D .. "M|
|00003d80| 65 73 73 61 67 65 54 72 | 61 6e 73 5f 4c 6f 6f 6b |essageTr|ans_Look|
|00003d90| 75 70 22 2c 6d 65 73 73 | 61 67 65 5f 70 74 72 2c |up",mess|age_ptr,|
|00003da0| 41 24 2c 4d 62 75 66 66 | 25 2c 32 35 36 2c 22 22 |A$,Mbuff|%,256,""|
|00003db0| 2c 22 22 20 b8 2c 2c 2c | 4c 25 0d 1e 0a 1a 20 4d |,"" .,,,|L%.... M|
|00003dc0| 62 75 66 66 25 3f 4c 25 | 3d 31 33 3a 3d 24 4d 62 |buff%?L%|=13:=$Mb|
|00003dd0| 75 66 66 25 0d 1e 19 10 | 20 f4 2d 2d 2d 2d 2d 2d |uff%....| .------|
|00003de0| 2d 2d 2d 2d 0d 1e 28 0f | 20 dd f2 66 72 6f 6e 74 |----..(.| ..front|
|00003df0| 5f 69 74 0d 1e 37 36 20 | 62 6c 6f 63 6b 25 21 30 |_it..76 |block%!0|
|00003e00| 3d 77 68 61 6e 64 6c 65 | 31 25 3a c8 99 22 57 69 |=whandle|1%:.."Wi|
|00003e10| 6d 70 5f 47 65 74 57 69 | 6e 64 6f 77 49 6e 66 6f |mp_GetWi|ndowInfo|
|00003e20| 22 2c 2c 62 6c 6f 63 6b | 25 0d 1e 46 4b 20 e7 20 |",,block|%..FK . |
|00003e30| 62 6c 6f 63 6b 25 21 31 | 36 3e 74 6f 70 5f 79 2d |block%!1|6>top_y-|
|00003e40| 34 32 20 84 20 62 6c 6f | 63 6b 25 21 38 3c 34 34 |42 . blo|ck%!8<44|
|00003e50| 20 84 20 28 62 6c 6f 63 | 6b 25 21 31 36 2d 62 6c | . (bloc|k%!16-bl|
|00003e60| 6f 63 6b 25 21 38 3c 3e | 28 38 36 38 2a 74 78 73 |ock%!8<>|(868*txs|
|00003e70| 29 29 20 8c 0d 1e 55 35 | 20 20 62 6c 6f 63 6b 25 |)) ...U5|  block%|
|00003e80| 21 31 36 3d 74 6f 70 5f | 79 2d 34 32 3a 62 6c 6f |!16=top_|y-42:blo|
|00003e90| 63 6b 25 21 38 3d 62 6c | 6f 63 6b 25 21 31 36 2d |ck%!8=bl|ock%!16-|
|00003ea0| 28 38 36 38 2a 74 78 73 | 29 0d 1e 64 06 20 cd 0d |(868*txs|)..d. ..|
|00003eb0| 1e 73 52 20 e7 20 62 6c | 6f 63 6b 25 21 34 3c 30 |.sR . bl|ock%!4<0|
|00003ec0| 20 84 20 28 62 6c 6f 63 | 6b 25 21 34 2b 28 38 37 | . (bloc|k%!4+(87|
|00003ed0| 34 2a 74 78 73 29 29 3e | 74 6f 70 5f 78 20 84 20 |4*txs))>|top_x . |
|00003ee0| 28 62 6c 6f 63 6b 25 21 | 31 32 2d 62 6c 6f 63 6b |(block%!|12-block|
|00003ef0| 25 21 34 3c 3e 28 38 37 | 34 2a 74 78 73 29 29 20 |%!4<>(87|4*txs)) |
|00003f00| 8c 0d 1e 82 43 20 20 62 | 6c 6f 63 6b 25 21 34 3d |....C  b|lock%!4=|
|00003f10| 28 74 6f 70 5f 78 2f 32 | 29 2d 28 28 38 37 34 2a |(top_x/2|)-((874*|
|00003f20| 74 78 73 29 2f 32 29 3a | 62 6c 6f 63 6b 25 21 31 |txs)/2):|block%!1|
|00003f30| 32 3d 62 6c 6f 63 6b 25 | 21 34 2b 28 38 37 34 2a |2=block%|!4+(874*|
|00003f40| 74 78 73 29 0d 1e 91 06 | 20 cd 0d 1e a0 11 20 62 |txs)....| ..... b|
|00003f50| 6c 6f 63 6b 25 21 32 38 | 3d 2d 31 0d 1e af 20 20 |lock%!28|=-1...  |
|00003f60| c8 99 22 57 69 6d 70 5f | 4f 70 65 6e 57 69 6e 64 |.."Wimp_|OpenWind|
|00003f70| 6f 77 22 2c 2c 62 6c 6f | 63 6b 25 0d 1e be 0f 20 |ow",,blo|ck%.... |
|00003f80| f2 6d 69 6e 69 5f 70 6f | 6c 6c 0d 1e cd 06 20 e1 |.mini_po|ll.... .|
|00003f90| 0d 1e dc 10 20 f4 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.... .--|--------|
|00003fa0| 0d 1e eb 0c 20 dd f2 64 | 65 6c 61 79 0d 1e fa 1b |.... ..d|elay....|
|00003fb0| 20 e3 20 74 69 6d 65 5f | 6c 6f 6f 70 3d 31 20 b8 | . time_|loop=1 .|
|00003fc0| 20 34 30 30 30 3a ed 0d | 1f 09 06 20 e1 0d 1f 18 | 4000:..|... ....|
|00003fd0| 10 20 f4 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 1f 27 |. .-----|-----..'|
|00003fe0| 0d 20 dd f2 63 61 72 64 | 5f 78 0d 1f 36 24 20 c8 |. ..card|_x..6$ .|
|00003ff0| 99 22 57 69 6d 70 5f 50 | 6f 6c 6c 22 2c 2c 62 6c |."Wimp_P|oll",,bl|
|00004000| 6f 63 6b 25 20 b8 20 72 | 65 61 73 6f 6e 25 0d 1f |ock% . r|eason%..|
|00004010| 45 11 20 c8 8e 20 72 65 | 61 73 6f 6e 25 20 ca 0d |E. .. re|ason% ..|
|00004020| 1f 54 12 20 20 c9 20 31 | 20 3a f2 72 65 64 72 61 |.T.  . 1| :.redra|
|00004030| 77 0d 1f 63 26 20 20 c9 | 20 32 20 3a c8 99 22 57 |w..c&  .| 2 :.."W|
|00004040| 69 6d 70 5f 4f 70 65 6e | 57 69 6e 64 6f 77 22 2c |imp_Open|Window",|
|00004050| 2c 62 6c 6f 63 6b 25 0d | 1f 72 06 20 cb 0d 1f 81 |,block%.|.r. ....|
|00004060| 06 20 e1 0d 1f 90 10 20 | f4 2d 2d 2d 2d 2d 2d 2d |. ..... |.-------|
|00004070| 2d 2d 2d 0d 1f 9f 1d 20 | dd f2 61 6c 65 72 74 28 |---.... |..alert(|
|00004080| 6d 65 24 2c 62 75 74 31 | 24 2c 62 75 74 32 24 29 |me$,but1|$,but2$)|
|00004090| 0d 1f ae 1b 20 f2 69 73 | 65 74 28 32 2c 6d 65 24 |.... .is|et(2,me$|
|000040a0| 2c 77 68 61 6e 64 6c 65 | 39 25 29 0d 1f bd 36 20 |,whandle|9%)...6 |
|000040b0| f2 69 73 65 74 28 36 2c | 62 75 74 31 24 2c 77 68 |.iset(6,|but1$,wh|
|000040c0| 61 6e 64 6c 65 39 25 29 | 3a f2 69 73 65 74 28 37 |andle9%)|:.iset(7|
|000040d0| 2c 62 75 74 32 24 2c 77 | 68 61 6e 64 6c 65 39 25 |,but2$,w|handle9%|
|000040e0| 29 0d 1f cc 10 20 61 6c | 65 72 74 3d 2d 31 3a ef |).... al|ert=-1:.|
|000040f0| 37 0d 1f db 36 20 62 6c | 6f 63 6b 25 21 30 3d 77 |7...6 bl|ock%!0=w|
|00004100| 68 61 6e 64 6c 65 39 25 | 3a c8 99 22 57 69 6d 70 |handle9%|:.."Wimp|
|00004110| 5f 47 65 74 57 69 6e 64 | 6f 77 49 6e 66 6f 22 2c |_GetWind|owInfo",|
|00004120| 2c 62 6c 6f 63 6b 25 0d | 1f ea 4a 20 78 31 3d 62 |,block%.|..J x1=b|
|00004130| 6c 6f 63 6b 25 21 34 3a | 79 31 3d 62 6c 6f 63 6b |lock%!4:|y1=block|
|00004140| 25 21 38 3a 77 69 64 3d | 62 6c 6f 63 6b 25 21 31 |%!8:wid=|block%!1|
|00004150| 32 2d 62 6c 6f 63 6b 25 | 21 34 3a 68 67 74 3d 62 |2-block%|!4:hgt=b|
|00004160| 6c 6f 63 6b 25 21 31 36 | 2d 62 6c 6f 63 6b 25 21 |lock%!16|-block%!|
|00004170| 38 0d 1f f9 34 20 c8 99 | 22 57 69 6d 70 5f 4f 70 |8...4 ..|"Wimp_Op|
|00004180| 65 6e 57 69 6e 64 6f 77 | 22 2c 2c 62 6c 6f 63 6b |enWindow|",,block|
|00004190| 25 3a c8 97 20 c8 93 20 | 78 31 2c 79 31 2c 77 69 |%:.. .. |x1,y1,wi|
|000041a0| 64 2c 68 67 74 0d 20 08 | 2b 20 c8 99 22 57 69 6d |d,hgt. .|+ .."Wim|
|000041b0| 70 5f 53 65 74 43 61 72 | 65 74 50 6f 73 69 74 69 |p_SetCar|etPositi|
|000041c0| 6f 6e 22 2c 77 68 61 6e | 64 6c 65 39 25 2c 2d 31 |on",whan|dle9%,-1|
|000041d0| 0d 20 17 06 20 f5 0d 20 | 26 26 20 20 c8 99 20 22 |. .. .. |&&  .. "|
|000041e0| 57 69 6d 70 5f 50 6f 6c | 6c 22 2c 2c 62 6c 6f 63 |Wimp_Pol|l",,bloc|
|000041f0| 6b 25 20 b8 20 72 65 61 | 73 6f 6e 25 0d 20 35 12 |k% . rea|son%. 5.|
|00004200| 20 20 c8 8e 20 72 65 61 | 73 6f 6e 25 20 ca 0d 20 |  .. rea|son% .. |
|00004210| 44 13 20 20 20 c9 20 31 | 20 3a f2 72 65 64 72 61 |D.   . 1| :.redra|
|00004220| 77 0d 20 53 27 20 20 20 | c9 20 32 20 3a c8 99 22 |w. S'   |. 2 :.."|
|00004230| 57 69 6d 70 5f 4f 70 65 | 6e 57 69 6e 64 6f 77 22 |Wimp_Ope|nWindow"|
|00004240| 2c 2c 62 6c 6f 63 6b 25 | 0d 20 62 0b 20 20 20 c9 |,,block%|. b.   .|
|00004250| 20 36 3a 0d 20 71 1d 20 | 20 20 20 e7 20 62 6c 6f | 6:. q. |   . blo|
|00004260| 63 6b 25 21 31 36 3d 36 | 20 61 6c 65 72 74 3d 32 |ck%!16=6| alert=2|
|00004270| 0d 20 80 1d 20 20 20 20 | e7 20 62 6c 6f 63 6b 25 |. ..    |. block%|
|00004280| 21 31 36 3d 37 20 61 6c | 65 72 74 3d 30 0d 20 8f |!16=7 al|ert=0. .|
|00004290| 21 20 20 20 c9 20 38 3a | e7 20 62 6c 6f 63 6b 25 |!   . 8:|. block%|
|000042a0| 21 32 34 3d 31 33 20 61 | 6c 65 72 74 3d 32 0d 20 |!24=13 a|lert=2. |
|000042b0| 9e 07 20 20 cb 0d 20 ad | 10 20 fd 20 61 6c 65 72 |..  .. .|. . aler|
|000042c0| 74 3c 3e 2d 31 0d 20 bc | 20 20 e7 20 61 6c 65 72 |t<>-1. .|  . aler|
|000042d0| 74 3d 32 20 f2 7a 31 61 | 28 34 2c 77 68 61 6e 64 |t=2 .z1a|(4,whand|
|000042e0| 6c 65 39 25 29 0d 20 cb | 1f 20 e7 20 61 6c 65 72 |le9%). .|. . aler|
|000042f0| 74 3d 30 20 f2 7a 31 28 | 35 2c 77 68 61 6e 64 6c |t=0 .z1(|5,whandl|
|00004300| 65 39 25 29 0d 20 da 1f | 20 f2 72 65 73 74 6f 72 |e9%). ..| .restor|
|00004310| 65 66 75 6c 6c 6d 6f 75 | 73 65 72 65 63 74 61 6e |efullmou|serectan|
|00004320| 67 6c 65 0d 20 e9 3f 20 | 62 6c 6f 63 6b 25 21 30 |gle. .? |block%!0|
|00004330| 3d 77 68 61 6e 64 6c 65 | 39 25 3a c8 99 22 57 69 |=whandle|9%:.."Wi|
|00004340| 6d 70 5f 43 6c 6f 73 65 | 57 69 6e 64 6f 77 22 2c |mp_Close|Window",|
|00004350| 2c 62 6c 6f 63 6b 25 3a | f2 6d 69 6e 69 5f 70 6f |,block%:|.mini_po|
|00004360| 6c 6c 0d 20 f8 2b 20 c8 | 99 22 57 69 6d 70 5f 53 |ll. .+ .|."Wimp_S|
|00004370| 65 74 43 61 72 65 74 50 | 6f 73 69 74 69 6f 6e 22 |etCaretP|osition"|
|00004380| 2c 77 68 61 6e 64 6c 65 | 31 25 2c 2d 31 0d 21 07 |,whandle|1%,-1.!.|
|00004390| 06 20 e1 0d 21 16 10 20 | f4 2d 2d 2d 2d 2d 2d 2d |. ..!.. |.-------|
|000043a0| 2d 2d 2d 0d 21 25 12 20 | dd f2 61 6c 65 72 74 32 |---.!%. |..alert2|
|000043b0| 28 6d 65 24 29 0d 21 34 | 28 20 f2 69 73 65 74 28 |(me$).!4|( .iset(|
|000043c0| 32 2c 6d 65 24 2c 77 68 | 61 6e 64 6c 65 31 35 25 |2,me$,wh|andle15%|
|000043d0| 29 3a 61 6c 65 72 74 3d | 2d 31 3a ef 37 0d 21 43 |):alert=|-1:.7.!C|
|000043e0| 37 20 62 6c 6f 63 6b 25 | 21 30 3d 77 68 61 6e 64 |7 block%|!0=whand|
|000043f0| 6c 65 31 35 25 3a c8 99 | 22 57 69 6d 70 5f 47 65 |le15%:..|"Wimp_Ge|
|00004400| 74 57 69 6e 64 6f 77 49 | 6e 66 6f 22 2c 2c 62 6c |tWindowI|nfo",,bl|
|00004410| 6f 63 6b 25 0d 21 52 4a | 20 78 31 3d 62 6c 6f 63 |ock%.!RJ| x1=bloc|
|00004420| 6b 25 21 34 3a 79 31 3d | 62 6c 6f 63 6b 25 21 38 |k%!4:y1=|block%!8|
|00004430| 3a 77 69 64 3d 62 6c 6f | 63 6b 25 21 31 32 2d 62 |:wid=blo|ck%!12-b|
|00004440| 6c 6f 63 6b 25 21 34 3a | 68 67 74 3d 62 6c 6f 63 |lock%!4:|hgt=bloc|
|00004450| 6b 25 21 31 36 2d 62 6c | 6f 63 6b 25 21 38 0d 21 |k%!16-bl|ock%!8.!|
|00004460| 61 34 20 c8 99 22 57 69 | 6d 70 5f 4f 70 65 6e 57 |a4 .."Wi|mp_OpenW|
|00004470| 69 6e 64 6f 77 22 2c 2c | 62 6c 6f 63 6b 25 3a c8 |indow",,|block%:.|
|00004480| 97 20 c8 93 20 78 31 2c | 79 31 2c 77 69 64 2c 68 |. .. x1,|y1,wid,h|
|00004490| 67 74 0d 21 70 2c 20 c8 | 99 22 57 69 6d 70 5f 53 |gt.!p, .|."Wimp_S|
|000044a0| 65 74 43 61 72 65 74 50 | 6f 73 69 74 69 6f 6e 22 |etCaretP|osition"|
|000044b0| 2c 77 68 61 6e 64 6c 65 | 31 35 25 2c 2d 31 0d 21 |,whandle|15%,-1.!|
|000044c0| 7f 06 20 f5 0d 21 8e 26 | 20 20 c8 99 20 22 57 69 |.. ..!.&|  .. "Wi|
|000044d0| 6d 70 5f 50 6f 6c 6c 22 | 2c 2c 62 6c 6f 63 6b 25 |mp_Poll"|,,block%|
|000044e0| 20 b8 20 72 65 61 73 6f | 6e 25 0d 21 9d 13 20 20 | . reaso|n%.!..  |
|000044f0| 20 c8 8e 20 72 65 61 73 | 6f 6e 25 20 ca 0d 21 ac | .. reas|on% ..!.|
|00004500| 14 20 20 20 20 c9 20 31 | 20 3a f2 72 65 64 72 61 |.    . 1| :.redra|
|00004510| 77 0d 21 bb 29 20 20 20 | 20 c9 20 32 20 3a c8 99 |w.!.)   | . 2 :..|
|00004520| 20 22 57 69 6d 70 5f 4f | 70 65 6e 57 69 6e 64 6f | "Wimp_O|penWindo|
|00004530| 77 22 2c 2c 62 6c 6f 63 | 6b 25 0d 21 ca 0c 20 20 |w",,bloc|k%.!..  |
|00004540| 20 20 c9 20 36 3a 0d 21 | d9 1e 20 20 20 20 20 e7 |  . 6:.!|..     .|
|00004550| 20 62 6c 6f 63 6b 25 21 | 31 36 3d 36 20 61 6c 65 | block%!|16=6 ale|
|00004560| 72 74 3d 32 0d 21 e8 1e | 20 20 20 20 20 e7 20 62 |rt=2.!..|     . b|
|00004570| 6c 6f 63 6b 25 21 31 36 | 3d 37 20 61 6c 65 72 74 |lock%!16|=7 alert|
|00004580| 3d 30 0d 21 f7 1e 20 20 | 20 20 20 e7 20 62 6c 6f |=0.!..  |   . blo|
|00004590| 63 6b 25 21 31 36 3d 39 | 20 61 6c 65 72 74 3d 34 |ck%!16=9| alert=4|
|000045a0| 0d 22 06 22 20 20 20 20 | c9 20 38 3a e7 20 62 6c |."."    |. 8:. bl|
|000045b0| 6f 63 6b 25 21 32 34 3d | 31 33 20 61 6c 65 72 74 |ock%!24=|13 alert|
|000045c0| 3d 32 0d 22 15 08 20 20 | 20 cb 0d 22 24 10 20 fd |=2."..  | .."$. .|
|000045d0| 20 61 6c 65 72 74 3c 3e | 2d 31 0d 22 33 20 20 e7 | alert<>|-1."3  .|
|000045e0| 20 61 6c 65 72 74 3d 32 | 20 f2 7a 31 28 34 2c 77 | alert=2| .z1(4,w|
|000045f0| 68 61 6e 64 6c 65 31 35 | 25 29 0d 22 42 1f 20 e7 |handle15|%)."B. .|
|00004600| 20 61 6c 65 72 74 3d 30 | 20 f2 7a 31 28 35 2c 77 | alert=0| .z1(5,w|
|00004610| 68 61 6e 64 6c 31 35 25 | 29 0d 22 51 20 20 e7 20 |handl15%|)."Q  . |
|00004620| 61 6c 65 72 74 3d 34 20 | f2 7a 31 28 38 2c 77 68 |alert=4 |.z1(8,wh|
|00004630| 61 6e 64 6c 65 31 35 25 | 29 0d 22 60 1f 20 f2 72 |andle15%|)."`. .r|
|00004640| 65 73 74 6f 72 65 66 75 | 6c 6c 6d 6f 75 73 65 72 |estorefu|llmouser|
|00004650| 65 63 74 61 6e 67 6c 65 | 0d 22 6f 35 20 62 6c 6f |ectangle|."o5 blo|
|00004660| 63 6b 25 21 30 3d 77 68 | 61 6e 64 6c 65 31 35 25 |ck%!0=wh|andle15%|
|00004670| 3a c8 99 22 57 69 6d 70 | 5f 43 6c 6f 73 65 57 69 |:.."Wimp|_CloseWi|
|00004680| 6e 64 6f 77 22 2c 2c 62 | 6c 6f 63 6b 25 0d 22 7e |ndow",,b|lock%."~|
|00004690| 2b 20 c8 99 22 57 69 6d | 70 5f 53 65 74 43 61 72 |+ .."Wim|p_SetCar|
|000046a0| 65 74 50 6f 73 69 74 69 | 6f 6e 22 2c 77 68 61 6e |etPositi|on",whan|
|000046b0| 64 6c 65 31 25 2c 2d 31 | 0d 22 8d 06 20 e1 0d 22 |dle1%,-1|.".. .."|
|000046c0| 9c 10 20 f4 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 22 |.. .----|------."|
|000046d0| ab 23 20 dd f2 66 72 61 | 6d 65 28 66 78 25 2c 66 |.# ..fra|me(fx%,f|
|000046e0| 79 25 2c 68 74 25 2c 77 | 64 25 2c 68 65 61 64 24 |y%,ht%,w|d%,head$|
|000046f0| 29 0d 22 ba 2c 20 6c 25 | 3d 28 31 36 2a 28 31 2b |)."., l%|=(16*(1+|
|00004700| a9 68 65 61 64 24 29 29 | 2b 38 3a 68 25 3d 35 34 |.head$))|+8:h%=54|
|00004710| 3a e7 20 eb 3e 31 35 20 | 68 25 3d 35 32 0d 22 c9 |:. .>15 |h%=52.".|
|00004720| 19 20 c8 99 22 57 69 6d | 70 5f 53 65 74 43 6f 6c |. .."Wim|p_SetCol|
|00004730| 6f 75 72 22 2c 30 0d 22 | d8 21 20 c8 93 20 66 78 |our",0."|.! .. fx|
|00004740| 25 2b 31 36 2c 66 79 25 | 2b 68 74 25 2d 32 34 2c |%+16,fy%|+ht%-24,|
|00004750| 6c 25 2c 68 25 2d 32 0d | 22 e7 23 20 c8 93 20 66 |l%,h%-2.|".# .. f|
|00004760| 78 25 2b 31 36 2b 32 2c | 66 79 25 2b 68 74 25 2d |x%+16+2,|fy%+ht%-|
|00004770| 32 34 2c 6c 25 2d 34 2c | 68 25 0d 22 f6 2d 20 c8 |24,l%-4,|h%.".- .|
|00004780| 99 22 57 69 6d 70 5f 53 | 65 74 43 6f 6c 6f 75 72 |."Wimp_S|etColour|
|00004790| 22 2c 34 3a ec 20 66 78 | 25 2b 31 38 2c 66 79 25 |",4:. fx|%+18,fy%|
|000047a0| 2b 68 74 25 2d 32 34 0d | 23 05 1d 20 df 20 66 78 |+ht%-24.|#.. . fx|
|000047b0| 25 2b 31 38 2b 6c 25 2d | 34 2c 66 79 25 2b 68 74 |%+18+l%-|4,fy%+ht|
|000047c0| 25 2d 32 34 0d 23 14 31 | 20 ec 20 66 78 25 2b 31 |%-24.#.1| . fx%+1|
|000047d0| 38 2c 66 79 25 2b 68 74 | 25 2d 32 32 3a df 20 66 |8,fy%+ht|%-22:. f|
|000047e0| 78 25 2b 31 38 2b 6c 25 | 2d 34 2c 66 79 25 2b 68 |x%+18+l%|-4,fy%+h|
|000047f0| 74 25 2d 32 32 0d 23 23 | 37 20 ec 20 66 78 25 2b |t%-22.##|7 . fx%+|
|00004800| 31 36 2b 6c 25 2c 66 79 | 25 2b 68 74 25 2d 32 34 |16+l%,fy|%+ht%-24|
|00004810| 3a df 20 66 78 25 2b 31 | 36 2b 6c 25 2c 66 79 25 |:. fx%+1|6+l%,fy%|
|00004820| 2b 68 74 25 2b 28 68 25 | 2d 32 34 29 0d 23 32 37 |+ht%+(h%|-24).#27|
|00004830| 20 ec 20 66 78 25 2b 31 | 34 2b 6c 25 2c 66 79 25 | . fx%+1|4+l%,fy%|
|00004840| 2b 68 74 25 2d 32 34 3a | df 20 66 78 25 2b 31 34 |+ht%-24:|. fx%+14|
|00004850| 2b 6c 25 2c 66 79 25 2b | 68 74 25 2b 28 68 25 2d |+l%,fy%+|ht%+(h%-|
|00004860| 32 34 29 0d 23 41 04 0d | 23 50 2c 20 c8 99 22 57 |24).#A..|#P, .."W|
|00004870| 69 6d 70 5f 53 65 74 43 | 6f 6c 6f 75 72 22 2c 30 |imp_SetC|olour",0|
|00004880| 3a c8 93 20 66 78 25 2c | 66 79 25 2c 77 64 25 2c |:.. fx%,|fy%,wd%,|
|00004890| 68 74 25 0d 23 5f 36 20 | c8 93 20 66 78 25 2b 32 |ht%.#_6 |.. fx%+2|
|000048a0| 2c 66 79 25 2c 77 64 25 | 2d 34 2c 68 74 25 3a c8 |,fy%,wd%|-4,ht%:.|
|000048b0| 93 20 66 78 25 2b 34 2c | 66 79 25 2b 34 2c 77 64 |. fx%+4,|fy%+4,wd|
|000048c0| 25 2d 38 2c 68 74 25 2d | 36 0d 23 6e 20 20 c8 93 |%-8,ht%-|6.#n  ..|
|000048d0| 20 66 78 25 2b 36 2c 66 | 79 25 2b 34 2c 77 64 25 | fx%+6,f|y%+4,wd%|
|000048e0| 2d 31 32 2c 68 74 25 2d | 32 0d 23 7d 27 20 ec 20 |-12,ht%-|2.#}' . |
|000048f0| 66 78 25 2c 66 79 25 2b | 68 74 25 2b 32 3a df 20 |fx%,fy%+|ht%+2:. |
|00004900| 66 78 25 2b 31 30 2c 66 | 79 25 2b 68 74 25 2b 32 |fx%+10,f|y%+ht%+2|
|00004910| 0d 23 8c 20 20 ec 20 66 | 78 25 2c 66 79 25 2b 32 |.#.  . f|x%,fy%+2|
|00004920| 3a df 20 66 78 25 2b 77 | 64 25 2c 66 79 25 2b 32 |:. fx%+w|d%,fy%+2|
|00004930| 0d 23 9b 35 20 c8 99 22 | 57 69 6d 70 5f 53 65 74 |.#.5 .."|Wimp_Set|
|00004940| 43 6f 6c 6f 75 72 22 2c | 34 3a ec 20 66 78 25 2b |Colour",|4:. fx%+|
|00004950| 32 2c 66 79 25 3a df 20 | 66 78 25 2b 77 64 25 2d |2,fy%:. |fx%+wd%-|
|00004960| 32 2c 66 79 25 0d 23 aa | 48 20 ec 20 66 78 25 2b |2,fy%.#.|H . fx%+|
|00004970| 77 64 25 2c 66 79 25 3a | df 20 66 78 25 2b 77 64 |wd%,fy%:|. fx%+wd|
|00004980| 25 2c 66 79 25 2b 68 74 | 25 3a ec 20 66 78 25 2b |%,fy%+ht|%:. fx%+|
|00004990| 77 64 25 2d 32 2c 66 79 | 25 3a df 20 66 78 25 2b |wd%-2,fy|%:. fx%+|
|000049a0| 77 64 25 2d 32 2c 66 79 | 25 2b 68 74 25 0d 23 b9 |wd%-2,fy|%+ht%.#.|
|000049b0| 22 20 ec 20 66 78 25 2b | 34 2c 66 79 25 3a df 20 |" . fx%+|4,fy%:. |
|000049c0| 66 78 25 2b 34 2c 66 79 | 25 2b 68 74 25 2d 32 0d |fx%+4,fy|%+ht%-2.|
|000049d0| 23 c8 24 20 ec 20 66 78 | 25 2b 36 2c 66 79 25 2b |#.$ . fx|%+6,fy%+|
|000049e0| 34 3a df 20 66 78 25 2b | 36 2c 66 79 25 2b 68 74 |4:. fx%+|6,fy%+ht|
|000049f0| 25 2d 32 0d 23 d7 2c 20 | ec 20 66 78 25 2b 34 2c |%-2.#., |. fx%+4,|
|00004a00| 66 79 25 2b 68 74 25 2d | 32 3a df 20 66 78 25 2b |fy%+ht%-|2:. fx%+|
|00004a10| 77 64 25 2d 36 2c 66 79 | 25 2b 68 74 25 2d 32 0d |wd%-6,fy|%+ht%-2.|
|00004a20| 23 e6 04 0d 23 f5 3d 20 | c8 99 22 57 69 6d 70 5f |#...#.= |.."Wimp_|
|00004a30| 53 65 74 43 6f 6c 6f 75 | 72 22 2c 31 3a c8 93 20 |SetColou|r",1:.. |
|00004a40| c8 90 20 66 78 25 2b 32 | 32 2c 66 79 25 2b 68 74 |.. fx%+2|2,fy%+ht|
|00004a50| 25 2d 31 38 2c 6c 25 2d | 31 30 2c 34 38 2d 31 30 |%-18,l%-|10,48-10|
|00004a60| 0d 24 04 37 20 c8 99 22 | 57 69 6d 70 5f 53 65 74 |.$.7 .."|Wimp_Set|
|00004a70| 43 6f 6c 6f 75 72 22 2c | 37 3a ec 20 66 78 25 2b |Colour",|7:. fx%+|
|00004a80| 31 36 2b 31 32 2c 66 79 | 25 2b 68 74 25 2b 31 36 |16+12,fy|%+ht%+16|
|00004a90| 3a f1 68 65 61 64 24 0d | 24 13 06 20 e1 0d 24 22 |:.head$.|$.. ..$"|
|00004aa0| 10 20 f4 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 24 31 |. .-----|-----.$1|
|00004ab0| 21 20 dd f2 62 6f 72 5f | 66 72 61 6d 65 28 66 78 |! ..bor_|frame(fx|
|00004ac0| 25 2c 66 79 25 2c 68 74 | 25 2c 77 64 25 29 0d 24 |%,fy%,ht|%,wd%).$|
|00004ad0| 40 2c 20 c8 99 22 57 69 | 6d 70 5f 53 65 74 43 6f |@, .."Wi|mp_SetCo|
|00004ae0| 6c 6f 75 72 22 2c 30 3a | c8 93 20 66 78 25 2c 66 |lour",0:|.. fx%,f|
|00004af0| 79 25 2c 77 64 25 2c 68 | 74 25 0d 24 4f 36 20 c8 |y%,wd%,h|t%.$O6 .|
|00004b00| 93 20 66 78 25 2b 32 2c | 66 79 25 2c 77 64 25 2d |. fx%+2,|fy%,wd%-|
|00004b10| 34 2c 68 74 25 3a c8 93 | 20 66 78 25 2b 34 2c 66 |4,ht%:..| fx%+4,f|
|00004b20| 79 25 2b 34 2c 77 64 25 | 2d 38 2c 68 74 25 2d 36 |y%+4,wd%|-8,ht%-6|
|00004b30| 0d 24 5e 20 20 c8 93 20 | 66 78 25 2b 36 2c 66 79 |.$^  .. |fx%+6,fy|
|00004b40| 25 2b 34 2c 77 64 25 2d | 31 32 2c 68 74 25 2d 32 |%+4,wd%-|12,ht%-2|
|00004b50| 0d 24 6d 27 20 ec 20 66 | 78 25 2c 66 79 25 2b 68 |.$m' . f|x%,fy%+h|
|00004b60| 74 25 2b 32 3a df 20 66 | 78 25 2b 31 30 2c 66 79 |t%+2:. f|x%+10,fy|
|00004b70| 25 2b 68 74 25 2b 32 0d | 24 7c 20 20 ec 20 66 78 |%+ht%+2.|$|  . fx|
|00004b80| 25 2c 66 79 25 2b 32 3a | df 20 66 78 25 2b 77 64 |%,fy%+2:|. fx%+wd|
|00004b90| 25 2c 66 79 25 2b 32 0d | 24 8b 35 20 c8 99 22 57 |%,fy%+2.|$.5 .."W|
|00004ba0| 69 6d 70 5f 53 65 74 43 | 6f 6c 6f 75 72 22 2c 34 |imp_SetC|olour",4|
|00004bb0| 3a ec 20 66 78 25 2b 32 | 2c 66 79 25 3a df 20 66 |:. fx%+2|,fy%:. f|
|00004bc0| 78 25 2b 77 64 25 2d 32 | 2c 66 79 25 0d 24 9a 48 |x%+wd%-2|,fy%.$.H|
|00004bd0| 20 ec 20 66 78 25 2b 77 | 64 25 2c 66 79 25 3a df | . fx%+w|d%,fy%:.|
|00004be0| 20 66 78 25 2b 77 64 25 | 2c 66 79 25 2b 68 74 25 | fx%+wd%|,fy%+ht%|
|00004bf0| 3a ec 20 66 78 25 2b 77 | 64 25 2d 32 2c 66 79 25 |:. fx%+w|d%-2,fy%|
|00004c00| 3a df 20 66 78 25 2b 77 | 64 25 2d 32 2c 66 79 25 |:. fx%+w|d%-2,fy%|
|00004c10| 2b 68 74 25 0d 24 a9 24 | 20 ec 20 66 78 25 2b 34 |+ht%.$.$| . fx%+4|
|00004c20| 2c 66 79 25 2b 34 3a df | 20 66 78 25 2b 34 2c 66 |,fy%+4:.| fx%+4,f|
|00004c30| 79 25 2b 68 74 25 2d 32 | 0d 24 b8 24 20 ec 20 66 |y%+ht%-2|.$.$ . f|
|00004c40| 78 25 2b 36 2c 66 79 25 | 2b 36 3a df 20 66 78 25 |x%+6,fy%|+6:. fx%|
|00004c50| 2b 36 2c 66 79 25 2b 68 | 74 25 2d 32 0d 24 c7 2c |+6,fy%+h|t%-2.$.,|
|00004c60| 20 ec 20 66 78 25 2b 34 | 2c 66 79 25 2b 68 74 25 | . fx%+4|,fy%+ht%|
|00004c70| 2d 32 3a df 20 66 78 25 | 2b 77 64 25 2d 36 2c 66 |-2:. fx%|+wd%-6,f|
|00004c80| 79 25 2b 68 74 25 2d 32 | 0d 24 d6 06 20 e1 0d 24 |y%+ht%-2|.$.. ..$|
|00004c90| e5 10 20 f4 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 24 |.. .----|------.$|
|00004ca0| f4 13 20 dd f2 75 70 64 | 61 74 65 5f 74 69 74 6c |.. ..upd|ate_titl|
|00004cb0| 65 0d 25 03 39 20 62 6c | 6f 63 6b 25 21 30 3d 77 |e.%.9 bl|ock%!0=w|
|00004cc0| 68 61 6e 64 6c 65 31 25 | 3a c8 99 22 57 69 6d 70 |handle1%|:.."Wimp|
|00004cd0| 5f 47 65 74 57 69 6e 64 | 6f 77 4f 75 74 6c 69 6e |_GetWind|owOutlin|
|00004ce0| 65 22 2c 2c 62 6c 6f 63 | 6b 25 0d 25 12 48 20 c8 |e",,bloc|k%.%.H .|
|00004cf0| 99 22 57 69 6d 70 5f 46 | 6f 72 63 65 52 65 64 72 |."Wimp_F|orceRedr|
|00004d00| 61 77 22 2c 2d 31 2c 62 | 6c 6f 63 6b 25 21 34 2c |aw",-1,b|lock%!4,|
|00004d10| 28 62 6c 6f 63 6b 25 21 | 31 36 2d 34 30 29 2c 62 |(block%!|16-40),b|
|00004d20| 6c 6f 63 6b 25 21 31 32 | 2c 62 6c 6f 63 6b 25 21 |lock%!12|,block%!|
|00004d30| 31 36 0d 25 21 06 20 e1 | 0d 25 30 10 20 f4 2d 2d |16.%!. .|.%0. .--|
|00004d40| 2d 2d 2d 2d 2d 2d 2d 2d | 0d 25 3f 0f 20 dd f2 6f |--------|.%?. ..o|
|00004d50| 70 65 6e 6d 61 69 6e 0d | 25 4e 37 20 62 6c 6f 63 |penmain.|%N7 bloc|
|00004d60| 6b 25 21 30 3d 77 68 61 | 6e 64 6c 65 31 25 3a c8 |k%!0=wha|ndle1%:.|
|00004d70| 99 22 57 69 6d 70 5f 47 | 65 74 57 69 6e 64 6f 77 |."Wimp_G|etWindow|
|00004d80| 53 74 61 74 65 22 2c 2c | 62 6c 6f 63 6b 25 0d 25 |State",,|block%.%|
|00004d90| 5d 38 20 62 6c 6f 63 6b | 25 21 32 30 3d 30 3a 62 |]8 block|%!20=0:b|
|00004da0| 6c 6f 63 6b 25 21 32 34 | 3d 30 3a c8 99 22 57 69 |lock%!24|=0:.."Wi|
|00004db0| 6d 70 5f 4f 70 65 6e 57 | 69 6e 64 6f 77 22 2c 2c |mp_OpenW|indow",,|
|00004dc0| 62 6c 6f 63 6b 25 0d 25 | 6c 06 20 e1 0d 25 7b 10 |block%.%|l. ..%{.|
|00004dd0| 20 f4 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 25 8a 0f | .------|----.%..|
|00004de0| 20 dd f2 72 65 61 64 5f | 76 65 72 0d 25 99 14 20 | ..read_|ver.%.. |
|00004df0| 2a 53 65 74 20 52 69 73 | 63 24 56 65 72 20 33 0d |*Set Ris|c$Ver 3.|
|00004e00| 25 a8 34 20 ff 28 22 52 | 4d 45 6e 73 75 72 65 20 |%.4 .("R|MEnsure |
|00004e10| 55 74 69 6c 69 74 79 4d | 6f 64 75 6c 65 20 33 2e |UtilityM|odule 3.|
|00004e20| 30 30 20 53 65 74 20 52 | 69 73 63 24 56 65 72 20 |00 Set R|isc$Ver |
|00004e30| 32 22 29 0d 25 b7 39 20 | c8 99 22 58 4f 53 5f 52 |2").%.9 |.."XOS_R|
|00004e40| 65 61 64 56 61 72 56 61 | 6c 22 2c 22 52 69 73 63 |eadVarVa|l","Risc|
|00004e50| 24 56 65 72 22 2c 62 6c | 6f 63 6b 25 2c 32 35 36 |$Ver",bl|ock%,256|
|00004e60| 2c 30 2c 30 20 b8 20 2c | 2c 6c 65 6e 0d 25 c6 20 |,0,0 . ,|,len.%. |
|00004e70| 20 62 6c 6f 63 6b 25 3f | 6c 65 6e 3d 31 33 3a 72 | block%?|len=13:r|
|00004e80| 69 73 63 24 3d 24 62 6c | 6f 63 6b 25 0d 25 d5 14 |isc$=$bl|ock%.%..|
|00004e90| 20 2a 55 6e 53 65 74 20 | 52 69 73 63 24 56 65 72 | *UnSet |Risc$Ver|
|00004ea0| 0d 25 e4 06 20 e1 0d 25 | f3 10 20 f4 2d 2d 2d 2d |.%.. ..%|.. .----|
|00004eb0| 2d 2d 2d 2d 2d 2d 0d 26 | 02 20 20 dd f2 72 65 73 |------.&|.  ..res|
|00004ec0| 74 6f 72 65 66 75 6c 6c | 6d 6f 75 73 65 72 65 63 |torefull|mouserec|
|00004ed0| 74 61 6e 67 6c 65 0d 26 | 11 36 20 ea 20 62 25 2c |tangle.&|.6 . b%,|
|00004ee0| 58 45 69 67 25 2c 59 45 | 69 67 25 2c 58 70 69 78 |XEig%,YE|ig%,Xpix|
|00004ef0| 25 2c 59 70 69 78 25 2c | 58 4f 53 55 75 6e 69 74 |%,Ypix%,|XOSUunit|
|00004f00| 73 25 2c 59 4f 53 75 6e | 69 74 73 25 0d 26 20 34 |s%,YOSun|its%.& 4|
|00004f10| 20 de 20 62 25 20 36 34 | 3a 62 25 21 30 3d 34 3a | . b% 64|:b%!0=4:|
|00004f20| 62 25 21 34 3d 35 3a 62 | 25 21 38 3d 31 31 3a 62 |b%!4=5:b|%!8=11:b|
|00004f30| 25 21 31 32 3d 31 32 3a | 62 25 21 31 36 3d 2d 31 |%!12=12:|b%!16=-1|
|00004f40| 0d 26 2f 22 20 c8 99 22 | 4f 53 5f 52 65 61 64 56 |.&/" .."|OS_ReadV|
|00004f50| 64 75 56 61 72 69 61 62 | 6c 65 73 22 2c 62 25 2c |duVariab|les",b%,|
|00004f60| 62 25 0d 26 3e 30 20 58 | 45 69 67 25 3d 21 62 25 |b%.&>0 X|Eig%=!b%|
|00004f70| 3a 59 45 69 67 25 3d 62 | 25 21 34 3a 58 70 69 78 |:YEig%=b|%!4:Xpix|
|00004f80| 25 3d 62 25 21 38 3a 59 | 70 69 78 25 3d 62 25 21 |%=b%!8:Y|pix%=b%!|
|00004f90| 31 32 0d 26 4d 3c 20 58 | 4f 53 55 6e 69 74 73 25 |12.&M< X|OSUnits%|
|00004fa0| 3d 28 58 70 69 78 25 2b | 31 29 2a 32 5e 58 45 69 |=(Xpix%+|1)*2^XEi|
|00004fb0| 67 25 3a 59 4f 53 55 6e | 69 74 73 25 3d 28 59 70 |g%:YOSUn|its%=(Yp|
|00004fc0| 69 78 25 2b 31 29 2a 32 | 5e 59 45 69 67 25 0d 26 |ix%+1)*2|^YEig%.&|
|00004fd0| 5c 22 20 c8 97 20 c8 93 | 20 30 2c 30 2c 58 4f 53 |\" .. ..| 0,0,XOS|
|00004fe0| 55 6e 69 74 73 25 2c 59 | 4f 53 55 6e 69 74 73 25 |Units%,Y|OSUnits%|
|00004ff0| 0d 26 6b 06 20 e1 0d 26 | 7a 10 20 f4 2d 2d 2d 2d |.&k. ..&|z. .----|
|00005000| 2d 2d 2d 2d 2d 2d 0d 26 | 89 11 20 dd f2 76 65 72 |------.&|.. ..ver|
|00005010| 69 66 28 65 2c 66 29 0d | 26 98 09 20 76 65 3d a3 |if(e,f).|&.. ve=.|
|00005020| 0d 26 a7 1a 20 e7 20 65 | 3c 31 20 84 20 66 3c 31 |.&.. . e|<1 . f<1|
|00005030| 20 76 65 3d b9 3a ef 37 | 3a e1 0d 26 b6 24 20 e7 | ve=.:.7|:..&.$ .|
|00005040| 20 65 3e 52 52 4f 57 53 | 25 20 84 20 66 3e 52 52 | e>RROWS|% . f>RR|
|00005050| 4f 57 53 25 20 76 65 3d | b9 3a ef 37 3a e1 0d 26 |OWS% ve=|.:.7:..&|
|00005060| c5 1d 20 e7 20 53 51 24 | 28 66 2c 65 29 3d 22 2e |.. . SQ$|(f,e)=".|
|00005070| 22 20 76 65 3d b9 3a ef | 37 3a e1 0d 26 d4 06 20 |" ve=.:.|7:..&.. |
|00005080| e1 0d 26 e3 10 20 f4 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..&.. .-|--------|
|00005090| 2d 0d 26 f2 0f 20 dd f2 | 6b 65 79 70 72 65 73 73 |-.&.. ..|keypress|
|000050a0| 0d 27 01 1d 20 49 25 3d | 62 6c 6f 63 6b 25 21 34 |.'.. I%=|block%!4|
|000050b0| 3a 4b 25 3d 62 6c 6f 63 | 6b 25 21 32 34 0d 27 10 |:K%=bloc|k%!24.'.|
|000050c0| 10 20 e7 20 4b 25 3d 26 | 31 38 30 20 8c 0d 27 1f |. . K%=&|180 ..'.|
|000050d0| 39 20 20 f2 70 64 72 69 | 76 65 72 3a f2 72 6d 28 |9  .pdri|ver:.rm(|
|000050e0| 22 45 52 52 42 22 29 3a | e7 20 74 79 70 24 3d 74 |"ERRB"):|. typ$=t|
|000050f0| 65 78 74 24 3a f2 6e 6f | 64 72 69 76 65 72 5f 65 |ext$:.no|driver_e|
|00005100| 72 72 6f 72 3a e1 0d 27 | 2e 14 20 20 f2 77 61 6e |rror:..'|..  .wan|
|00005110| 74 5f 61 5f 63 65 72 74 | 3a e1 0d 27 3d 06 20 cd |t_a_cert|:..'=. .|
|00005120| 0d 27 4c 12 20 c8 8e 20 | 62 6c 6f 63 6b 25 21 30 |.'L. .. |block%!0|
|00005130| 20 ca 0d 27 5b 10 20 c9 | 20 77 68 61 6e 64 6c 65 | ..'[. .| whandle|
|00005140| 31 25 0d 27 6a 52 20 e7 | 20 4b 25 3d 26 31 38 43 |1%.'jR .| K%=&18C|
|00005150| 20 f2 76 65 72 69 66 28 | 4d 58 2d 31 2c 4d 59 29 | .verif(|MX-1,MY)|
|00005160| 3a e7 20 76 65 3d a3 20 | f2 63 6f 76 65 72 3a 4d |:. ve=. |.cover:M|
|00005170| 58 2d 3d 31 3a f2 63 6f | 76 65 72 3a d4 20 31 2c |X-=1:.co|ver:. 1,|
|00005180| 2d 31 30 2c 33 30 2b 28 | 4d 58 2a 35 2b 4d 59 2a |-10,30+(|MX*5+MY*|
|00005190| 35 29 2c 31 0d 27 79 52 | 20 e7 20 4b 25 3d 26 31 |5),1.'yR| . K%=&1|
|000051a0| 38 44 20 f2 76 65 72 69 | 66 28 4d 58 2b 31 2c 4d |8D .veri|f(MX+1,M|
|000051b0| 59 29 3a e7 20 76 65 3d | a3 20 f2 63 6f 76 65 72 |Y):. ve=|. .cover|
|000051c0| 3a 4d 58 2b 3d 31 3a f2 | 63 6f 76 65 72 3a d4 20 |:MX+=1:.|cover:. |
|000051d0| 31 2c 2d 31 30 2c 33 30 | 2b 28 4d 58 2a 35 2b 4d |1,-10,30|+(MX*5+M|
|000051e0| 59 2a 35 29 2c 31 0d 27 | 88 52 20 e7 20 4b 25 3d |Y*5),1.'|.R . K%=|
|000051f0| 26 31 38 46 20 f2 76 65 | 72 69 66 28 4d 58 2c 4d |&18F .ve|rif(MX,M|
|00005200| 59 2d 31 29 3a e7 20 76 | 65 3d a3 20 f2 63 6f 76 |Y-1):. v|e=. .cov|
|00005210| 65 72 3a 4d 59 2d 3d 31 | 3a f2 63 6f 76 65 72 3a |er:MY-=1|:.cover:|
|00005220| d4 20 31 2c 2d 31 30 2c | 33 30 2b 28 4d 58 2a 35 |. 1,-10,|30+(MX*5|
|00005230| 2b 4d 59 2a 35 29 2c 31 | 0d 27 97 52 20 e7 20 4b |+MY*5),1|.'.R . K|
|00005240| 25 3d 26 31 38 45 20 f2 | 76 65 72 69 66 28 4d 58 |%=&18E .|verif(MX|
|00005250| 2c 4d 59 2b 31 29 3a e7 | 20 76 65 3d a3 20 f2 63 |,MY+1):.| ve=. .c|
|00005260| 6f 76 65 72 3a 4d 59 2b | 3d 31 3a f2 63 6f 76 65 |over:MY+|=1:.cove|
|00005270| 72 3a d4 20 31 2c 2d 31 | 30 2c 33 30 2b 28 4d 58 |r:. 1,-1|0,30+(MX|
|00005280| 2a 35 2b 4d 59 2a 35 29 | 2c 31 0d 27 a6 34 20 e7 |*5+MY*5)|,1.'.4 .|
|00005290| 20 67 61 6d 65 5f 65 6e | 64 3d a3 3a e7 20 4b 25 | game_en|d=.:. K%|
|000052a0| 3e 36 34 20 80 20 4b 25 | 3c 39 31 20 f2 73 68 6f |>64 . K%|<91 .sho|
|000052b0| 77 5f 69 6e 70 75 74 3a | f2 63 6f 76 65 72 0d 27 |w_input:|.cover.'|
|000052c0| a7 3c 20 e7 20 67 61 6d | 65 5f 65 6e 64 3d a3 3a |.< . gam|e_end=.:|
|000052d0| e7 20 4b 25 3e 39 36 20 | 80 20 4b 25 3c 31 32 33 |. K%>96 |. K%<123|
|000052e0| 20 4b 25 2d 3d 33 32 3a | f2 73 68 6f 77 5f 69 6e | K%-=32:|.show_in|
|000052f0| 70 75 74 3a f2 63 6f 76 | 65 72 0d 27 b5 04 0d 27 |put:.cov|er.'...'|
|00005300| c4 11 20 c9 20 70 72 69 | 6e 74 5f 77 69 6e 25 0d |.. . pri|nt_win%.|
|00005310| 27 d3 29 20 20 e7 20 49 | 25 3d 32 20 80 20 4b 25 |'.)  . I|%=2 . K%|
|00005320| 3d 31 33 20 f2 63 61 72 | 65 74 28 34 2c 70 72 69 |=13 .car|et(4,pri|
|00005330| 6e 74 5f 77 69 6e 25 29 | 0d 27 e2 79 20 20 e7 20 |nt_win%)|.'.y  . |
|00005340| 49 25 3d 34 20 80 20 4b | 25 3d 31 33 20 21 62 6c |I%=4 . K|%=13 !bl|
|00005350| 6f 63 6b 25 3d 30 3a 62 | 6c 6f 63 6b 25 21 34 3d |ock%=0:b|lock%!4=|
|00005360| 30 3a 62 6c 6f 63 6b 25 | 21 38 3d 34 3a 62 6c 6f |0:block%|!8=4:blo|
|00005370| 63 6b 25 21 31 32 3d 70 | 72 69 6e 74 5f 77 69 6e |ck%!12=p|rint_win|
|00005380| 25 3a 62 6c 6f 63 6b 25 | 21 31 36 3d 38 3a c8 99 |%:block%|!16=8:..|
|00005390| 22 57 69 6d 70 5f 53 65 | 6e 64 4d 65 73 73 61 67 |"Wimp_Se|ndMessag|
|000053a0| 65 22 2c 36 2c 62 6c 6f | 63 6b 25 2c 74 61 73 6b |e",6,blo|ck%,task|
|000053b0| 25 0d 27 f1 2b 20 20 e7 | 20 49 25 3d 34 20 80 20 |%.'.+  .| I%=4 . |
|000053c0| 4b 25 3d 26 31 38 46 20 | f2 63 61 72 65 74 28 32 |K%=&18F |.caret(2|
|000053d0| 2c 70 72 69 6e 74 5f 77 | 69 6e 25 29 0d 28 00 2b |,print_w|in%).(.+|
|000053e0| 20 20 e7 20 49 25 3d 32 | 20 80 20 4b 25 3d 26 31 |  . I%=2| . K%=&1|
|000053f0| 38 45 20 f2 63 61 72 65 | 74 28 34 2c 70 72 69 6e |8E .care|t(4,prin|
|00005400| 74 5f 77 69 6e 25 29 0d | 28 0f 06 20 cb 0d 28 1e |t_win%).|(.. ..(.|
|00005410| 1b 20 c8 99 22 57 69 6d | 70 5f 50 72 6f 63 65 73 |. .."Wim|p_Proces|
|00005420| 73 4b 65 79 22 2c 4b 25 | 0d 28 2d 06 20 e1 0d 28 |sKey",K%|.(-. ..(|
|00005430| 3c 10 20 f4 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 28 |<. .----|------.(|
|00005440| 4b 0c 20 dd f2 63 6f 76 | 65 72 0d 28 5a 55 20 66 |K. ..cov|er.(ZU f|
|00005450| 70 78 3d 67 72 69 64 5f | 78 3a 66 70 79 3d 2d 67 |px=grid_|x:fpy=-g|
|00005460| 72 69 64 5f 79 3a 66 70 | 78 3d 66 70 78 2b 28 4d |rid_y:fp|x=fpx+(M|
|00005470| 58 2d 53 43 4f 4c 53 25 | 29 2a 67 72 69 64 5f 73 |X-SCOLS%|)*grid_s|
|00005480| 7a 3a 66 70 79 3d 66 70 | 79 2b 28 53 52 4f 57 53 |z:fpy=fp|y+(SROWS|
|00005490| 25 2d 4d 59 2d 31 29 2a | 67 72 69 64 5f 73 7a 0d |%-MY-1)*|grid_sz.|
|000054a0| 28 69 4d 20 c8 99 22 57 | 69 6d 70 5f 46 6f 72 63 |(iM .."W|imp_Forc|
|000054b0| 65 52 65 64 72 61 77 22 | 2c 77 68 61 6e 64 6c 65 |eRedraw"|,whandle|
|000054c0| 31 25 2c 66 70 78 2d 38 | 2c 66 70 79 2d 38 2c 66 |1%,fpx-8|,fpy-8,f|
|000054d0| 70 78 2b 67 72 69 64 5f | 73 7a 2b 31 36 2c 66 70 |px+grid_|sz+16,fp|
|000054e0| 79 2b 67 72 69 64 5f 73 | 7a 2b 31 36 0d 28 78 06 |y+grid_s|z+16.(x.|
|000054f0| 20 e1 0d 28 87 10 20 f4 | 2d 2d 2d 2d 2d 2d 2d 2d | ..(.. .|--------|
|00005500| 2d 2d 0d 28 96 28 20 dd | f2 72 61 64 69 6f 5f 63 |--.(.( .|.radio_c|
|00005510| 6c 69 63 6b 28 77 68 2c | 78 31 2c 79 31 2c 78 32 |lick(wh,|x1,y1,x2|
|00005520| 2c 79 32 2c 73 74 61 74 | 65 29 0d 28 a5 30 20 62 |,y2,stat|e).(.0 b|
|00005530| 6c 6f 63 6b 25 21 30 3d | 77 68 3a c8 99 22 57 69 |lock%!0=|wh:.."Wi|
|00005540| 6d 70 5f 47 65 74 57 69 | 6e 64 6f 77 53 74 61 74 |mp_GetWi|ndowStat|
|00005550| 65 22 2c 2c 62 6c 6f 63 | 6b 25 0d 28 b4 1f 20 f2 |e",,bloc|k%.(.. .|
|00005560| 67 65 74 6f 72 69 67 69 | 6e 28 62 6c 6f 63 6b 25 |getorigi|n(block%|
|00005570| 2c 78 30 25 2c 79 30 25 | 29 0d 28 c3 32 20 e7 20 |,x0%,y0%|).(.2 . |
|00005580| 73 74 61 74 65 3d b9 20 | f2 70 69 63 74 75 72 65 |state=. |.picture|
|00005590| 28 34 34 2c 34 34 2c 69 | 63 6f 6e 73 70 61 63 65 |(44,44,i|conspace|
|000055a0| 2c 22 72 61 64 69 6f 6f | 6e 22 29 0d 28 d2 33 20 |,"radioo|n").(.3 |
|000055b0| e7 20 73 74 61 74 65 3d | a3 20 f2 70 69 63 74 75 |. state=|. .pictu|
|000055c0| 72 65 28 34 34 2c 34 34 | 2c 69 63 6f 6e 73 70 61 |re(44,44|,iconspa|
|000055d0| 63 65 2c 22 72 61 64 69 | 6f 6f 66 66 22 29 0d 28 |ce,"radi|ooff").(|
|000055e0| e1 42 20 62 6c 6f 63 6b | 25 21 30 3d 77 68 3a 62 |.B block|%!0=wh:b|
|000055f0| 6c 6f 63 6b 25 21 34 3d | 78 31 3a 62 6c 6f 63 6b |lock%!4=|x1:block|
|00005600| 25 21 38 3d 79 31 3a 62 | 6c 6f 63 6b 25 21 31 32 |%!8=y1:b|lock%!12|
|00005610| 3d 78 32 3a 62 6c 6f 63 | 6b 25 21 31 36 3d 79 32 |=x2:bloc|k%!16=y2|
|00005620| 0d 28 f0 2a 20 c8 99 22 | 57 69 6d 70 5f 55 70 64 |.(.* .."|Wimp_Upd|
|00005630| 61 74 65 57 69 6e 64 6f | 77 22 2c 2c 62 6c 6f 63 |ateWindo|w",,bloc|
|00005640| 6b 25 20 b8 20 6d 6f 72 | 65 25 0d 28 ff 0d 20 c8 |k% . mor|e%.(.. .|
|00005650| 95 20 6d 6f 72 65 25 0d | 29 0e 44 20 c8 99 22 4f |. more%.|).D .."O|
|00005660| 53 5f 53 70 72 69 74 65 | 4f 70 22 2c 35 36 34 2c |S_Sprite|Op",564,|
|00005670| 69 63 6f 6e 73 70 61 63 | 65 2c 61 64 64 25 2c 78 |iconspac|e,add%,x|
|00005680| 30 25 2b 78 31 2c 79 30 | 25 2b 79 31 2c 30 2c 6d |0%+x1,y0|%+y1,0,m|
|00005690| 61 67 25 2c 74 72 61 6e | 73 32 25 0d 29 1d 2a 20 |ag%,tran|s2%.).* |
|000056a0| c8 99 22 57 69 6d 70 5f | 47 65 74 52 65 63 74 61 |.."Wimp_|GetRecta|
|000056b0| 6e 67 6c 65 22 2c 2c 62 | 6c 6f 63 6b 25 20 b8 20 |ngle",,b|lock% . |
|000056c0| 6d 6f 72 65 25 0d 29 2c | 06 20 ce 0d 29 3b 06 20 |more%.),|. ..);. |
|000056d0| e1 0d 29 4a 11 20 f4 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..)J. .-|--------|
|000056e0| 2d 2d 0d 29 59 12 20 dd | f2 63 68 6f 6f 73 65 5f |--.)Y. .|.choose_|
|000056f0| 66 6f 6e 74 0d 29 68 10 | 20 63 68 6f 69 63 65 25 |font.)h.| choice%|
|00005700| 3d 2d 39 39 0d 29 77 16 | 20 e3 20 6c 6f 6f 70 3d |=-99.)w.| . loop=|
|00005710| 31 20 b8 20 66 6f 6e 74 | 73 25 0d 29 86 29 20 20 |1 . font|s%.).)  |
|00005720| e7 20 24 66 5f 61 6e 73 | 25 3d 66 6f 6e 74 73 24 |. $f_ans|%=fonts$|
|00005730| 28 6c 6f 6f 70 29 20 63 | 68 6f 69 63 65 25 3d 6c |(loop) c|hoice%=l|
|00005740| 6f 6f 70 0d 29 95 06 20 | ed 0d 29 a4 15 20 e7 20 |oop.).. |..).. . |
|00005750| 63 68 6f 69 63 65 25 3c | 3e 2d 39 39 20 e1 0d 29 |choice%<|>-99 ..)|
|00005760| b3 19 20 6c 6c 3d a9 28 | 24 66 5f 61 6e 73 25 29 |.. ll=.(|$f_ans%)|
|00005770| 3a 6c 6f 6f 70 3d 31 0d | 29 c2 06 20 f5 0d 29 d1 |:loop=1.|).. ..).|
|00005780| 2e 20 20 e7 20 24 66 5f | 61 6e 73 25 3d c0 66 6f |.  . $f_|ans%=.fo|
|00005790| 6e 74 73 24 28 6c 6f 6f | 70 29 2c 6c 6c 29 20 63 |nts$(loo|p),ll) c|
|000057a0| 68 6f 69 63 65 25 3d 6c | 6f 6f 70 0d 29 e0 0d 20 |hoice%=l|oop.).. |
|000057b0| 20 6c 6f 6f 70 2b 3d 31 | 0d 29 ef 21 20 fd 20 63 | loop+=1|.).! . c|
|000057c0| 68 6f 69 63 65 25 3c 3e | 2d 39 39 20 84 20 6c 6f |hoice%<>|-99 . lo|
|000057d0| 6f 70 3e 66 6f 6e 74 73 | 25 0d 29 fe 1b 20 e7 20 |op>fonts|%.).. . |
|000057e0| 63 68 6f 69 63 65 25 3d | 39 39 20 63 68 6f 69 63 |choice%=|99 choic|
|000057f0| 65 25 3d 31 0d 2a 0d 06 | 20 e1 0d 2a 1c 10 20 f4 |e%=1.*..| ..*.. .|
|00005800| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 2a 2b 11 20 dd |--------|--.*+. .|
|00005810| f2 63 68 65 63 6b 5f 6e | 61 6d 65 0d 2a 3a 19 20 |.check_n|ame.*:. |
|00005820| e7 20 28 a7 24 6e 61 6d | 65 25 2c 22 2a 22 29 29 |. (.$nam|e%,"*"))|
|00005830| 3e 30 20 e1 0d 2a 49 25 | 20 24 6e 61 6d 65 25 3d |>0 ..*I%| $name%=|
|00005840| 24 6e 61 6d 65 25 2b 22 | 20 2a 22 3a f2 75 70 64 |$name%+"| *":.upd|
|00005850| 61 74 65 5f 74 69 74 6c | 65 0d 2a 58 06 20 e1 0d |ate_titl|e.*X. ..|
|00005860| 2a 67 10 20 f4 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |*g. .---|-------.|
|00005870| 2a 76 15 20 dd f2 63 6c | 69 63 6b 5f 64 72 61 67 |*v. ..cl|ick_drag|
|00005880| 73 61 76 65 0d 2a 85 27 | 20 e7 20 69 63 3d 32 20 |save.*.'| . ic=2 |
|00005890| 80 20 28 62 75 20 80 20 | 26 35 30 29 3e 30 20 f2 |. (bu . |&50)>0 .|
|000058a0| 64 72 61 67 6f 75 74 6c | 69 6e 65 0d 2a 94 0e 20 |dragoutl|ine.*.. |
|000058b0| e7 20 69 63 3c 3e 31 20 | e1 0d 2a a3 4a 20 e7 20 |. ic<>1 |..*.J . |
|000058c0| 62 75 3d 34 20 84 20 62 | 75 3d 31 20 8c 20 f2 69 |bu=4 . b|u=1 . .i|
|000058d0| 72 65 61 64 28 30 2c 77 | 68 61 6e 64 6c 65 38 25 |read(0,w|handle8%|
|000058e0| 29 3a f2 73 61 76 65 28 | 61 24 29 3a c8 99 22 57 |):.save(|a$):.."W|
|000058f0| 69 6d 70 5f 43 72 65 61 | 74 65 4d 65 6e 75 22 2c |imp_Crea|teMenu",|
|00005900| 2c 2d 31 0d 2a b2 06 20 | e1 0d 2a c1 10 20 f4 2d |,-1.*.. |..*.. .-|
|00005910| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 35 7a 10 20 dd f2 |--------|-.5z. ..|
|00005920| 66 69 6e 64 5f 70 6f 73 | 6e 0d 35 89 2d 20 66 70 |find_pos|n.5.- fp|
|00005930| 78 3d 78 30 25 2b 67 72 | 69 64 5f 78 3a 66 70 79 |x=x0%+gr|id_x:fpy|
|00005940| 3d 79 30 25 2d 28 38 36 | 38 2a 74 78 73 29 2b 67 |=y0%-(86|8*txs)+g|
|00005950| 67 72 69 64 5f 79 0d 35 | 98 20 20 66 70 78 3d 66 |grid_y.5|.  fpx=f|
|00005960| 70 78 2b 28 4d 58 2d 53 | 43 4f 4c 53 25 29 2a 67 |px+(MX-S|COLS%)*g|
|00005970| 72 69 64 5f 73 7a 0d 35 | a7 22 20 66 70 79 3d 66 |rid_sz.5|." fpy=f|
|00005980| 70 79 2b 28 52 52 4f 57 | 53 25 2d 4d 59 2d 31 29 |py+(RROW|S%-MY-1)|
|00005990| 2a 67 72 69 64 5f 73 7a | 0d 35 d4 06 20 e1 0d 35 |*grid_sz|.5.. ..5|
|000059a0| e3 10 20 f4 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 35 |.. .----|------.5|
|000059b0| f2 0d 20 dd f2 72 65 64 | 72 61 77 0d 36 01 28 20 |.. ..red|raw.6.( |
|000059c0| c8 99 22 48 6f 75 72 67 | 6c 61 73 73 5f 4f 6e 22 |.."Hourg|lass_On"|
|000059d0| 3a 64 72 61 77 5f 72 65 | 6e 64 65 72 65 72 72 6f |:draw_re|ndererro|
|000059e0| 72 3d a3 0d 36 10 15 20 | 77 69 6e 64 6f 77 25 3d |r=..6.. |window%=|
|000059f0| 62 6c 6f 63 6b 25 21 30 | 0d 36 1f 2a 20 c8 99 22 |block%!0|.6.* .."|
|00005a00| 57 69 6d 70 5f 52 65 64 | 72 61 77 57 69 6e 64 6f |Wimp_Red|rawWindo|
|00005a10| 77 22 2c 2c 62 6c 6f 63 | 6b 25 20 b8 20 6d 6f 72 |w",,bloc|k% . mor|
|00005a20| 65 25 0d 36 2e 04 0d 36 | 3d 0d 20 c8 95 20 6d 6f |e%.6...6|=. .. mo|
|00005a30| 72 65 25 0d 36 4c 34 20 | 20 f2 67 65 74 6f 72 69 |re%.6L4 | .getori|
|00005a40| 67 69 6e 28 62 6c 6f 63 | 6b 25 2c 78 30 25 2c 79 |gin(bloc|k%,x0%,y|
|00005a50| 30 25 29 3a f2 67 65 74 | 5f 69 6e 66 6f 28 62 6c |0%):.get|_info(bl|
|00005a60| 6f 63 6b 25 2b 34 29 0d | 36 5b 46 20 20 43 6f 66 |ock%+4).|6[F  Cof|
|00005a70| 66 73 65 74 78 3d 28 62 | 6c 6f 63 6b 25 21 34 2d |fsetx=(b|lock%!4-|
|00005a80| 62 6c 6f 63 6b 25 21 32 | 30 29 3a 43 6f 66 66 73 |block%!2|0):Coffs|
|00005a90| 65 74 79 3d 28 62 6c 6f | 63 6b 25 21 31 36 2d 62 |ety=(blo|ck%!16-b|
|00005aa0| 6c 6f 63 6b 25 21 32 34 | 2d 38 34 38 29 0d 36 6a |lock%!24|-848).6j|
|00005ab0| 41 20 20 67 78 30 25 3d | 62 6c 6f 63 6b 25 21 32 |A  gx0%=|block%!2|
|00005ac0| 38 3a 67 79 30 25 3d 62 | 6c 6f 63 6b 25 21 33 32 |8:gy0%=b|lock%!32|
|00005ad0| 3a 67 78 31 25 3d 62 6c | 6f 63 6b 25 21 33 36 3a |:gx1%=bl|ock%!36:|
|00005ae0| 67 79 31 25 3d 62 6c 6f | 63 6b 25 21 34 30 0d 36 |gy1%=blo|ck%!40.6|
|00005af0| 79 39 20 20 67 78 30 25 | 3d 28 67 78 30 25 2d 78 |y9  gx0%|=(gx0%-x|
|00005b00| 30 25 29 81 33 32 2a 33 | 32 2b 78 30 25 3a 67 79 |0%).32*3|2+x0%:gy|
|00005b10| 31 25 3d 28 67 79 31 25 | 2d 79 30 25 29 81 33 32 |1%=(gy1%|-y0%).32|
|00005b20| 2a 33 32 2b 79 30 25 0d | 36 88 31 20 20 43 67 78 |*32+y0%.|6.1  Cgx|
|00005b30| 30 25 3d 67 78 30 25 3a | 43 67 79 30 25 3d 67 79 |0%=gx0%:|Cgy0%=gy|
|00005b40| 30 25 3a 43 67 78 31 25 | 3d 67 78 31 25 3a 43 67 |0%:Cgx1%|=gx1%:Cg|
|00005b50| 79 31 25 3d 67 79 31 25 | 0d 36 97 04 0d 36 a6 11 |y1%=gy1%|.6...6..|
|00005b60| 20 c8 8e 20 77 69 6e 64 | 6f 77 25 20 ca 0d 36 b5 | .. wind|ow% ..6.|
|00005b70| 04 0d 36 c4 11 20 20 c9 | 20 77 68 61 6e 64 6c 65 |..6..  .| whandle|
|00005b80| 31 25 0d 36 d3 56 20 20 | 20 e7 20 6f 6c 64 5f 73 |1%.6.V  | . old_s|
|00005b90| 74 79 6c 65 5f 6d 6f 64 | 65 3d eb 20 c8 99 22 4f |tyle_mod|e=. .."O|
|00005ba0| 53 5f 53 70 72 69 74 65 | 4f 70 22 2c 32 39 30 2c |S_Sprite|Op",290,|
|00005bb0| 67 72 61 62 5f 6d 65 6d | 73 74 61 72 74 2c 22 67 |grab_mem|start,"g|
|00005bc0| 72 61 62 22 2c 78 30 25 | 2c 79 30 25 2d 28 38 36 |rab",x0%|,y0%-(86|
|00005bd0| 38 2a 74 78 73 29 2c 30 | 0d 36 f1 11 20 20 20 e7 |8*txs),0|.6..   .|
|00005be0| 20 4d 58 3c 3e 2d 31 20 | 8c 0d 37 00 2e 20 20 20 | MX<>-1 |..7..   |
|00005bf0| 20 c8 99 22 4f 53 5f 52 | 65 61 64 4d 6f 64 65 56 | .."OS_R|eadModeV|
|00005c00| 61 72 69 61 62 6c 65 22 | 2c 2d 31 2c 35 20 b8 20 |ariable"|,-1,5 . |
|00005c10| 2c 2c 79 6d 61 67 32 0d | 37 0f 2e 20 20 20 20 c8 |,,ymag2.|7..    .|
|00005c20| 99 22 4f 53 5f 52 65 61 | 64 4d 6f 64 65 56 61 72 |."OS_Rea|dModeVar|
|00005c30| 69 61 62 6c 65 22 2c 2d | 31 2c 34 20 b8 20 2c 2c |iable",-|1,4 . ,,|
|00005c40| 78 6d 61 67 32 0d 37 1e | 28 20 20 20 20 c8 99 22 |xmag2.7.|(    .."|
|00005c50| 57 69 6d 70 5f 53 65 74 | 43 6f 6c 6f 75 72 22 2c |Wimp_Set|Colour",|
|00005c60| 31 31 3a f2 66 69 6e 64 | 5f 70 6f 73 6e 0d 37 2d |11:.find|_posn.7-|
|00005c70| 22 20 20 20 20 c8 93 20 | 66 70 78 2c 66 70 79 2c |"    .. |fpx,fpy,|
|00005c80| 67 72 69 64 5f 73 7a 2c | 67 72 69 64 5f 73 7a 0d |grid_sz,|grid_sz.|
|00005c90| 37 3c 52 20 20 20 20 c8 | 93 20 66 70 78 2d 28 32 |7<R    .|. fpx-(2|
|00005ca0| 5e 78 6d 61 67 32 29 2c | 66 70 79 2d 28 32 5e 79 |^xmag2),|fpy-(2^y|
|00005cb0| 6d 61 67 32 29 2c 67 72 | 69 64 5f 73 7a 2b 28 32 |mag2),gr|id_sz+(2|
|00005cc0| 2a 28 32 5e 78 6d 61 67 | 32 29 29 2c 67 72 69 64 |*(2^xmag|2)),grid|
|00005cd0| 5f 73 7a 2b 28 32 2a 28 | 32 5e 79 6d 61 67 32 29 |_sz+(2*(|2^ymag2)|
|00005ce0| 29 0d 37 4b 08 20 20 20 | cd 0d 37 5a 04 0d 37 69 |).7K.   |..7Z..7i|
|00005cf0| 41 20 c9 20 77 68 61 6e | 64 6c 65 39 25 3a f2 72 |A . whan|dle9%:.r|
|00005d00| 6d 28 22 46 52 41 31 22 | 29 3a f2 66 72 61 6d 65 |m("FRA1"|):.frame|
|00005d10| 28 78 30 25 2b 32 34 2c | 79 30 25 2d 33 36 30 2c |(x0%+24,|y0%-360,|
|00005d20| 33 30 34 2c 35 32 36 2c | 74 65 78 74 24 29 0d 37 |304,526,|text$).7|
|00005d30| 78 04 0d 37 87 11 20 c9 | 20 77 68 61 6e 64 6c 65 |x..7.. .| whandle|
|00005d40| 31 35 25 0d 37 96 35 20 | f2 72 6d 28 22 46 52 41 |15%.7.5 |.rm("FRA|
|00005d50| 31 22 29 3a f2 66 72 61 | 6d 65 28 78 30 25 2b 32 |1"):.fra|me(x0%+2|
|00005d60| 34 2c 79 30 25 2d 33 36 | 30 2c 33 30 34 2c 35 32 |4,y0%-36|0,304,52|
|00005d70| 36 2c 74 65 78 74 24 29 | 0d 37 a5 04 0d 37 b4 40 |6,text$)|.7...7.@|
|00005d80| 20 c9 20 66 69 6e 5f 77 | 69 6e 25 3a f2 72 6d 28 | . fin_w|in%:.rm(|
|00005d90| 22 46 52 41 32 22 29 3a | f2 66 72 61 6d 65 28 78 |"FRA2"):|.frame(x|
|00005da0| 30 25 2b 32 34 2c 79 30 | 25 2d 33 36 30 2c 33 30 |0%+24,y0|%-360,30|
|00005db0| 34 2c 35 32 36 2c 74 65 | 78 74 24 29 0d 37 c3 1c |4,526,te|xt$).7..|
|00005dc0| 20 c9 20 61 63 72 6f 73 | 73 25 3a f2 63 6c 75 65 | . acros|s%:.clue|
|00005dd0| 73 5f 61 63 72 6f 73 73 | 0d 37 d2 34 20 c9 20 70 |s_across|.7.4 . p|
|00005de0| 72 69 6e 74 5f 77 69 6e | 25 3a f2 62 6f 72 5f 66 |rint_win|%:.bor_f|
|00005df0| 72 61 6d 65 28 78 30 25 | 2b 31 38 2c 79 30 25 2d |rame(x0%|+18,y0%-|
|00005e00| 32 30 38 2c 31 38 38 2c | 34 34 38 29 0d 37 e1 3f |208,188,|448).7.?|
|00005e10| 20 c9 20 65 72 72 62 6f | 78 25 3a f2 72 6d 28 22 | . errbo|x%:.rm("|
|00005e20| 46 52 41 36 22 29 3a f2 | 66 72 61 6d 65 28 78 30 |FRA6"):.|frame(x0|
|00005e30| 25 2b 32 34 2c 79 30 25 | 2d 33 36 30 2c 33 30 34 |%+24,y0%|-360,304|
|00005e40| 2c 35 32 36 2c 74 65 78 | 74 24 29 0d 37 f0 04 0d |,526,tex|t$).7...|
|00005e50| 37 ff 0e 20 c9 20 70 72 | 6f 6d 70 74 25 0d 38 00 |7.. . pr|ompt%.8.|
|00005e60| 2c 20 20 c8 99 22 57 69 | 6d 70 5f 53 65 74 43 6f |,  .."Wi|mp_SetCo|
|00005e70| 6c 6f 75 72 22 2c 30 3a | c8 93 20 c8 90 20 30 2c |lour",0:|.. .. 0,|
|00005e80| 30 2c 31 30 32 34 2c 39 | 30 0d 38 0e 1a 20 20 c8 |0,1024,9|0.8..  .|
|00005e90| 99 22 57 69 6d 70 5f 53 | 65 74 43 6f 6c 6f 75 72 |."Wimp_S|etColour|
|00005ea0| 22 2c 37 0d 38 1d 38 20 | 20 e7 20 57 44 5f 44 49 |",7.8.8 | . WD_DI|
|00005eb0| 52 28 70 72 6f 6d 29 3d | 31 20 ec 20 78 30 25 2b |R(prom)=|1 . x0%+|
|00005ec0| 34 2c 79 30 25 2d 38 3a | f1 28 c3 70 72 6f 6d 29 |4,y0%-8:|.(.prom)|
|00005ed0| 2b 22 20 41 63 72 6f 73 | 73 3a 22 0d 38 2c 36 20 |+" Acros|s:".8,6 |
|00005ee0| 20 e7 20 57 44 5f 44 49 | 52 28 70 72 6f 6d 29 3d | . WD_DI|R(prom)=|
|00005ef0| 32 20 ec 20 78 30 25 2b | 34 2c 79 30 25 2d 38 3a |2 . x0%+|4,y0%-8:|
|00005f00| f1 28 c3 70 72 6f 6d 29 | 2b 22 20 44 6f 77 6e 3a |.(.prom)|+" Down:|
|00005f10| 22 0d 38 30 14 20 20 6c | 3d a9 57 44 24 28 31 2c |".80.  l|=.WD$(1,|
|00005f20| 70 72 6f 6d 29 0d 38 3b | 2d 20 20 ec 20 78 30 25 |prom).8;|-  . x0%|
|00005f30| 2b 34 2c 79 30 25 2d 34 | 34 3a f1 57 44 24 28 32 |+4,y0%-4|4:.WD$(2|
|00005f40| 2c 70 72 6f 6d 29 2b 22 | 20 28 22 2b c3 6c 2b 22 |,prom)+"| ("+.l+"|
|00005f50| 29 22 0d 38 4a 06 20 cb | 0d 38 59 2a 20 c8 99 22 |)".8J. .|.8Y* .."|
|00005f60| 57 69 6d 70 5f 47 65 74 | 52 65 63 74 61 6e 67 6c |Wimp_Get|Rectangl|
|00005f70| 65 22 2c 2c 62 6c 6f 63 | 6b 25 20 b8 20 6d 6f 72 |e",,bloc|k% . mor|
|00005f80| 65 25 0d 38 68 06 20 ce | 0d 38 95 18 20 c8 99 22 |e%.8h. .|.8.. .."|
|00005f90| 48 6f 75 72 67 6c 61 73 | 73 5f 53 6d 61 73 68 22 |Hourglas|s_Smash"|
|00005fa0| 0d 38 a4 06 20 e1 0d 38 | b3 10 20 f4 2d 2d 2d 2d |.8.. ..8|.. .----|
|00005fb0| 2d 2d 2d 2d 2d 2d 0d 38 | c2 21 20 dd a4 69 6e 74 |------.8|.! ..int|
|00005fc0| 65 72 73 65 63 74 28 78 | 30 25 2c 79 30 25 2c 78 |ersect(x|0%,y0%,x|
|00005fd0| 31 25 2c 79 31 25 29 0d | 38 d1 1f 20 e7 20 78 31 |1%,y1%).|8.. . x1|
|00005fe0| 25 3c 67 78 30 25 20 84 | 20 78 30 25 3e 67 78 31 |%<gx0% .| x0%>gx1|
|00005ff0| 25 20 8c 20 3d a3 0d 38 | e0 1f 20 e7 20 79 31 25 |% . =..8|.. . y1%|
|00006000| 3c 67 79 30 25 20 84 20 | 79 30 25 3e 67 79 31 25 |<gy0% . |y0%>gy1%|
|00006010| 20 8c 20 3d a3 0d 38 ef | 07 20 3d b9 0d 38 fe 10 | . =..8.|. =..8..|
|00006020| 20 f4 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 39 0d 20 | .------|----.9. |
|00006030| 20 dd f2 72 65 63 74 66 | 69 6c 6c 28 78 30 25 2c | ..rectf|ill(x0%,|
|00006040| 79 30 25 2c 78 31 25 2c | 79 31 25 29 0d 39 1c 17 |y0%,x1%,|y1%).9..|
|00006050| 20 ea 20 78 78 25 2c 79 | 79 25 2c 68 74 25 2c 77 | . xx%,y|y%,ht%,w|
|00006060| 69 64 25 0d 39 2b 1e 20 | e7 20 78 31 25 3c 67 78 |id%.9+. |. x1%<gx|
|00006070| 30 25 20 84 20 78 30 25 | 3e 67 78 31 25 20 8c 20 |0% . x0%|>gx1% . |
|00006080| e1 0d 39 3a 1e 20 e7 20 | 79 31 25 3c 67 79 30 25 |..9:. . |y1%<gy0%|
|00006090| 20 84 20 79 30 25 3e 67 | 79 31 25 20 8c 20 e1 0d | . y0%>g|y1% . ..|
|000060a0| 39 49 22 20 e7 20 78 30 | 25 3e 67 78 30 25 20 78 |9I" . x0|%>gx0% x|
|000060b0| 78 25 3d 78 30 25 20 8b | 20 78 78 25 3d 67 78 30 |x%=x0% .| xx%=gx0|
|000060c0| 25 0d 39 58 22 20 e7 20 | 79 30 25 3e 67 79 30 25 |%.9X" . |y0%>gy0%|
|000060d0| 20 79 79 25 3d 79 30 25 | 20 8b 20 79 79 25 3d 67 | yy%=y0%| . yy%=g|
|000060e0| 79 30 25 0d 39 67 2c 20 | e7 20 78 31 25 3c 67 78 |y0%.9g, |. x1%<gx|
|000060f0| 31 25 20 77 69 64 25 3d | 78 31 25 2d 78 78 25 20 |1% wid%=|x1%-xx% |
|00006100| 8b 20 77 69 64 25 3d 67 | 78 31 25 2d 78 78 25 0d |. wid%=g|x1%-xx%.|
|00006110| 39 76 2a 20 e7 20 79 31 | 25 3c 67 79 31 25 20 68 |9v* . y1|%<gy1% h|
|00006120| 74 25 3d 79 31 25 2d 79 | 79 25 20 8b 20 68 74 25 |t%=y1%-y|y% . ht%|
|00006130| 3d 67 79 31 25 2d 79 79 | 25 0d 39 85 1b 20 c8 93 |=gy1%-yy|%.9.. ..|
|00006140| 20 c8 90 20 78 78 25 2c | 79 79 25 2c 77 69 64 25 | .. xx%,|yy%,wid%|
|00006150| 2c 68 74 25 0d 39 94 06 | 20 e1 0d 39 a3 10 20 f4 |,ht%.9..| ..9.. .|
|00006160| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 39 b2 1d 20 dd |--------|--.9.. .|
|00006170| f2 67 72 61 62 6d 6f 72 | 65 6d 65 6d 6f 72 79 28 |.grabmor|ememory(|
|00006180| 6d 6d 6f 72 79 25 29 0d | 39 c1 1e 20 72 65 71 6d |mmory%).|9.. reqm|
|00006190| 65 6d 3d 6d 6d 6f 72 79 | 25 2d 6d 64 61 74 61 62 |em=mmory|%-mdatab|
|000061a0| 6c 6f 63 6b 25 0d 39 d0 | 12 20 6d 6d 6f 72 79 25 |lock%.9.|. mmory%|
|000061b0| 2d 3d 26 38 30 30 30 0d | 39 df 29 20 c8 99 22 57 |-=&8000.|9.) .."W|
|000061c0| 69 6d 70 5f 53 6c 6f 74 | 53 69 7a 65 22 2c 6d 6d |imp_Slot|Size",mm|
|000061d0| 6f 72 79 25 2c 2d 31 20 | b8 20 6d 6d 6f 72 79 25 |ory%,-1 |. mmory%|
|000061e0| 0d 39 ee 21 20 6d 64 61 | 74 61 62 6c 6f 63 6b 5f |.9.! mda|tablock_|
|000061f0| 65 6e 64 25 3d 6d 6d 6f | 72 79 25 2b 26 38 30 30 |end%=mmo|ry%+&800|
|00006200| 30 0d 39 fd 27 20 67 6f | 74 6d 65 6d 3d 6d 64 61 |0.9.' go|tmem=mda|
|00006210| 74 61 62 6c 6f 63 6b 5f | 65 6e 64 25 2d 6d 64 61 |tablock_|end%-mda|
|00006220| 74 61 62 6c 6f 63 6b 25 | 0d 3a 0c 17 20 e7 20 67 |tablock%|.:.. . g|
|00006230| 6f 74 6d 65 6d 3e 3d 72 | 65 71 6d 65 6d 20 e1 0d |otmem>=r|eqmem ..|
|00006240| 3a 1b 3f 20 62 6c 6f 63 | 6b 25 21 30 3d 77 68 61 |:.? bloc|k%!0=wha|
|00006250| 6e 64 6c 65 31 25 3a c8 | 99 22 57 69 6d 70 5f 43 |ndle1%:.|."Wimp_C|
|00006260| 6c 6f 73 65 57 69 6e 64 | 6f 77 22 2c 2c 62 6c 6f |loseWind|ow",,blo|
|00006270| 63 6b 25 3a f2 6d 69 6e | 69 5f 70 6f 6c 6c 0d 3a |ck%:.min|i_poll.:|
|00006280| 2a 1f 20 67 72 61 62 62 | 65 64 3d a3 3a 63 6c 6f |*. grabb|ed=.:clo|
|00006290| 73 65 64 25 3d b9 3a 65 | 6e 64 25 3d b9 0d 3a 39 |sed%=.:e|nd%=..:9|
|000062a0| 1a 20 f2 72 6d 28 22 45 | 52 52 45 22 29 3a 85 20 |. .rm("E|RRE"):. |
|000062b0| 31 2c 74 65 78 74 24 0d | 3a 48 06 20 e1 0d 3a 57 |1,text$.|:H. ..:W|
|000062c0| 10 20 f4 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 3a 66 |. .-----|-----.:f|
|000062d0| 12 20 dd f2 73 74 61 72 | 74 75 70 5f 6d 65 6d 0d |. ..star|tup_mem.|
|000062e0| 3a 75 27 20 f2 67 72 61 | 62 6d 6f 72 65 6d 65 6d |:u' .gra|bmoremem|
|000062f0| 6f 72 79 28 6d 64 61 74 | 61 62 6c 6f 63 6b 25 2b |ory(mdat|ablock%+|
|00006300| 37 30 30 30 30 29 0d 3a | 84 30 20 67 72 61 62 5f |70000).:|.0 grab_|
|00006310| 6d 65 6d 73 74 61 72 74 | 3d 6d 64 61 74 61 62 6c |memstart|=mdatabl|
|00006320| 6f 63 6b 25 3a 67 72 61 | 62 5f 62 75 66 6c 65 6e |ock%:gra|b_buflen|
|00006330| 3d 36 39 39 39 36 0d 3a | 93 06 20 e1 0d 3a a2 10 |=69996.:|.. ..:..|
|00006340| 20 f4 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 3a b1 13 | .------|----.:..|
|00006350| 20 dd f2 67 65 74 5f 69 | 6e 66 6f 28 70 25 29 0d | ..get_i|nfo(p%).|
|00006360| 3a c0 2c 20 43 78 30 25 | 3d 21 70 25 3a 43 79 30 |:., Cx0%|=!p%:Cy0|
|00006370| 25 3d 70 25 21 34 3a 43 | 78 31 25 3d 70 25 21 38 |%=p%!4:C|x1%=p%!8|
|00006380| 3a 43 79 31 25 3d 70 25 | 21 31 32 0d 3a cf 2c 20 |:Cy1%=p%|!12.:., |
|00006390| 43 73 63 78 25 3d 70 25 | 21 31 36 3a 43 73 63 79 |Cscx%=p%|!16:Cscy|
|000063a0| 25 3d 70 25 21 32 30 3a | 43 62 68 61 6e 64 6c 65 |%=p%!20:|Cbhandle|
|000063b0| 25 3d 70 25 21 32 34 0d | 3a de 24 20 43 62 78 25 |%=p%!24.|:.$ Cbx%|
|000063c0| 3d 43 78 30 25 2d 43 73 | 63 78 25 3a 43 62 79 25 |=Cx0%-Cs|cx%:Cby%|
|000063d0| 3d 43 79 31 25 2d 43 73 | 63 79 25 0d 3a ed 06 20 |=Cy1%-Cs|cy%.:.. |
|000063e0| e1 0d 3a fc 10 20 f4 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..:.. .-|--------|
|000063f0| 2d 0d 3b 0b 13 20 dd f2 | 7a 31 28 69 63 63 2c 77 |-.;.. ..|z1(icc,w|
+--------+-------------------------+-------------------------+--------+--------+